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When  it  comes  to  fantasy  games,  the  ADVAHCED 
DUriGEOnsef  DRAGOns  system  is  the  real  stuff.  In 
fact,  AOS^D  designed  fantasy  role-playing  gaming  as 
we  know  it  today! 

Only  AD&D  games  provide  the  incredible  richness 
of  detail  Hiat  makes  vast  and  mysterious  worlds  come 
alive,  filled  with  characters,  monsters,  weapons,  spells 
and  encounters  of  incredible  diversity  and  depth. 

now  SSI  uses  this  legendary  system  to  take  fantasy 
gaming  one  step  beyond:  A  line  of  ADSfD  compitler 
games  set  in  the  immense  world  known  as  the 
ForgoUen  Realms.  -— 

Every  game  in  this 

exciting  series         —  ■■  — 

^    can  be  enjoyed  by  itself.  However,  the  beauty 
of  SSI's  roRQonm  I^alms  epics  is  that  they 
are  intricately,  woven  together.  The  more  you 
play,  tile  more  you'll  discover  the  glorious 
wonders  of  this  mystical  domain. 

i        Pool  of  Radiaihce:  the  first  and  now 
ft    classic  AD&D  computer  role-playing 
ft    game.  In  the  fabled  ruins  of  Phlan  and 
around  the  northern  shore  of  the  Moon- 
sea,  your  band  of  si,x  Flayer  Characters 
fight  an  unending  wave  of  monsters 
and  strive  to  unmask  their  mysterious  leader. 

tliLLSFAR:  An  action-adventure  game  that 
is  a  crucial  slopping  point  in  your  travels. 
^    tlillsfar  serves  as  the  training  grounds  for  all 
your  heroes.  Transfer  your  characters  froiri 
Fool  of  Hadiance  or  Curae  of  ttic  A7.ute 
Bonds  and  increase  their  skills  Ihrough 
vigorous  wodiouts  that  include  combat, 
maze-running,  lock-picking,  arcliery  and 
horseback  riding.  Succeed  in  MHIsfar  and 
;    some  of  your  characters'  statistics  will 
^     actually  improve.  They  will  emerge 
from  lltllsfar  more  prepared  than  ever 
to  survive  your  dangerous  journey , 

CvKSE  OF  WE  AzvRE  BoHOs:  the  set)uel  to 
'     Poo!  of  Radiance,  with  deadlier  monsters, 
more  poiverful  spells  and  new  Player- 
Character  types.  In  this  game,  you  find  your 
characters'  arms  mysteriously  imprinted 
with  azure  blue  symbols.  When  they  glow, 
they  ensnare  your  will  —  you  must  do  as 
'     they  command!  Search  the  realms  for 
members  of  the  flew  Alliance  who 
forged  these  chains  of  enslavement  and 
remove  the  Curse  of  the  Azure  Bonds. 

Look  for  AD&fD  games  from  SSI  at  your 
favorite  retailer.  A  wondrous  universe  awaits  you. 


TO  OF(l)t;R:  Visfl  your  retailer  or  call  1-800-245-4525  (o  chaitjc  on 
VISA/MC.  To  receive  SSI's  cottiplcic  product  cnlalo{j,  send  $1.00  lo: 
SSI,  1046  M.  Rengslorff  Ave.,  Mountain  View,  CA  94043. 
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GEos  128  2.0  Prices  &  Service 


Includes: 

•  Gsowfite  Workshop  128 

•  Geospell  128 

•  Many  dramafc  improvements 

•  Both  80  and  40  column  modes 

•  Much,  much  more 

88956  $CALL 


Diskette  Storage 


56  Page 

"Everything  Book' 

With  Anv  Order 


•  100  disk  (S  1/2")  capacity. 

•  Lock  and  Keys  for  exi-a  security  and  easy 
caifying. 

•  Includes  8  Index  dividers  lor  organization  ol 
fjling  and  retrlevei. 

•  Made  of  durable  anti-static,  high  impact 
plastic. 

•  Attractive  smoke  colored  lid. 

Siig,  Retail  $19.95 
66B2S  $9,9S 


«129Bs 


!■! 


'(!('\'lV'.ViViV.!i'r' 


I.l.l.l.I;'. M 


^i'MTI  I)  lit    I  I 


Commodore  64C 

The  complete  computer  for  ticms,  sctiwi  and  BntaJI  biisl- 
nt*t.  S  upporteo  byhigh-qualltyperlptteialsa/idoverlD.COO 
lOftwar e  prog  rams .  F  u  3  lypewiaer-elyle  hojftjoartj.  64K  RAM , 
elghl  ipiites.  thieo  voicni. 
e4C  Computsr  j>4574     i^2».K 

Commodore  Hardware 


Commodora  t23D 
1G70  Modem,  1200  Saud 
13S1  IMouse  C&t'C1£S 
ie02C  Compos  its  Monitor 
I  set  3.5"  Disk  Drive 
1$4I  11  Disk  Orlvo 
I7S4  I^AM  Eiptnalan  C64 


7)133     $4  St. 85 
3e9^       IGfl.SS 


37865 
54595 


$32.85 
ICALL 


74023     1 179.95 
54585     $184.95 


$|6A95 
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STAR  NXIOOO 

NX-IOOO  Speedy  144cp5  draft  mode,  36cps  rmar-letler- 
ciuality.  Features  Include  front  pano!  controls  anil  mulllple 
KLO  tonis.  Friction  and  tractor  food,  plus  convenient  single 
shveol  Ised  nxide. 

NX-1000  F^lnlMl  PirilliH  )  74S27     I1M.9S 

NX-IOOOCPrlnlef  (Commodore)  75060  |1fi9.9S 
NX-IDOD  nalnlnw  Color  Printar  75077     1224.95 

NX-1D0aCnalnb<!w(CommodaiB)      75783     $224.95 
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AMIGA  500 

The  500  Indudes  51 2K  b^os  IniainaOy  and  Is  oxpandsbloto 
B  MB,  two  Joystick  potts,  a  aoititl  part,  a  parallel  pott,  an 
external  disk  drive  pon,  and  a  built-in  3.5'  disk  drive.  1 1  even 
Includes  a  Zbutton  mousel 
Atnlfli  SOO  73729      iCALL 

AMIGA  2000 

Ttia  2000  has  multitasking  ablKtEes,  eprlEos,  a  graphic  co. 
procossDi  and  built-in  spetK^.  With  hoyboaid,  mouBo, 
joystick,  FtS232andCenlronlcgpons.tlie  2000  la  a  poweriu  I 
compulor.  It  has  a  bul(i-h  a.S'diskdrtvo,  mounting  kieailons 
lor  two  filter  nal  Aniga  (loppy  disk  drives  and  has  an  Interna] 
option  lor  IBM  PDXT  compatbljty.  Standard  RAM  Is  a  lull 
MB  and  Is  ejpand^le  to  9  MB, 
Amiga  2000  77317      JCALL 

AMIGA  Accessories 

10843  Color  Slfiteo  Monitor  74095  $CALL 

3.5  EitnnsI  Disk  Drlva  74DB7  CAUL 

Intcfnil  3.5"  Disk  Drive  a0CQ4  CALL 

51 2K  Eipantlon  792C8  CALL 

SMC  Expiniitan  79279  CALL 

Brldgccard  V//S,Z5  79249  CALL 

Hard  Drive  Control  79222  CALL 

1200  Baud  Modem  79237  CALL 

RF  Modulator  79263  CALL 

NLQ,  Dot  Matriii  Printer  79294  CALL 


Features  include  mode  selection,  pitch  selection,  180 cps  in 
high  epeed  dratt  mods  and  120cos  In  utility  mode.  Neat- 
twter-cualily  toid  prims  at  30cps.  Includes  Ixxh  tiialon  teed 
and  lixed  tractor  lor  standard  wklih  pertoialed  edge.  Both 
Commodore  and  standard  parallel  input. 
Okldalt  180  Printer  71634     $224,95 


$18998 
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72513    $114,95        PRICES  TOO  LOW  TO  ADVEIiTISEt 


Panasonic 
KX-P1180 

Select  ever  1 1  (unci Ions  on  (row  panel.  Four  NLQ  lonis  and 
hro  dratt  fonts,  each  sized  5  to  20  char  Jin.  Proporitonal 
spacing.  Graphics  240i215dpl.  Draft  at  192  cps,  NLQ  at 
38cps.  Push  Of  pull  tractor  teed.  Tvra  year  warranty. 
PaniBonic  KX-PnSO  62779     $tB>.95 
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We  gladly  accept  mall  orderal 

TENEX  Computer  Express 
P.O.  Box  6578 
South  Bend,  IN  46660 

(219)  259-7051 


No  Extra  Foo  For  Chargesl 

i' 


We  Verfty  Charge  Card  Addioaaas 


Shipping,  Handling,  Insurance 
Order  Arnauni  Chatga 

less  than  S19.M „ $3.73 

S20.O0-139.99 .,..„4,75 

«  0.00  $74.99 „ 6.75 

S75.03-S  149.99 e.75 

$150,0a-$299.93  „ 7.75 

J300.CO  S  up 8.75 


■m 


ORDER  TODAY  CALL  1-800-348-2778 


COMMODORE  64  and  COMMODORE  128  af»  tegisterod  trademarks  ol  Commodoro  Electronics,  Ltd.  AMIGA  is  a  roglslorod  Iradamark  ot  Cormodore  Amiga  Inc.,  APO,  FPO,  AK,  Hi,  CN, 
VI,  GU,  and  foreign  orders  are  sub]oct  to  additional  shipping  charges.  NOTE:  Due  to  pupliihing  ioad-limije,  product  pricoa  and  spocificationa  are  subject  to  change  vdlhoul  nolloo,     fiSg 
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This  issue  marks  the  sixth  anniversary  of  Gazette.  If  you're  a  longtime  reader, 
you  have  a  good  sense  of  the  topsy-turvy  history  of  both  the  Commodore 
market  and  the  general  personal  computer  market.  The  past  six  years  have  been  a 
virtual  roller-coaster  ride.  Back  in  the  spring  of  1983,  viJhen  we  debuted  Gazette,  the 
Commodore  64  was  the  hottest  machine  going.  Anyone  who  wrote  anything  in 
BASIC  was  suddenly  a  software  vendor — and  many  unexceptional  products  did 
very  well  because  of  the  great  demand. 

Software  sales  went  berserk  until  the  great  shakoout  in  1984.  The  software 
publishers  who  survived  the  shakeout  took  the  quality  of  software  up  several  pla- 
teaus. Also  in  1984,  Commodore  introduced  the  ill-fated  Commodore  Plus/4, 
which  some  say  was  the  intended  legacy  of  the  freshly  departed  and  embittered 
Commodore  CEO,  Jack  Tramiel, 

The  Plus/4  and  16  weren't  the  only  hardware  flops  in  1984-1985.  Remember 
the  Coleco  Adam,  the  TI-99,  and  the  IBM  PCjr?  One  machine  rose,  however,  from 
the  heap:  the  Commodore  128,  Like  its  younger  cousin,  the  64,  it  showed  contin- 
ued growth  into  1987. 

Despite  rumors  of  the  64 's  demise  in  1986  and  1987,  it  continued  to  sell  well. 
During  these  years,  in  fact.  Commodore  several  times  stopped  production  of  the  64 
and  then  restarted  it  because  of  demand. 

The  popularity  of  the  64  and  128  finally  tapered  off  beginning  in  1987.  In  one 
sense,  both  machines  are  still  strong^who  can  argue  with  such  a  huge  installed 
base? — but  they've  been  hurt  in  recent  years  by  a  number  of  surprising  competi- 
tors. Who  could  have  predicted  the  huge  swell  in  sales  of  MS-DOS  machines  or  the 
tidal-wave  surge  of  Nintendo?  The  newer  technologies  and  allure  of  Apple's  Mac- 
intosh and  Commodore's  own  Amiga  also  provided  appealing  alternatives  to  the 
user  and  programmer. 

The  64  and  128  have  been  solid  and  surprising  contenders  in  the  personal 
computer  market  despite  all  that's  worked  against  their  continued  success — and 
despite  Commodore.  To  trace  the  history  of  leadership  at  Commodore  is  a  quick 
study  of  the  workings  of  the  revolving  door.  If  you've  been  with  us  for  a  while,  you 
might  remember  the  names  of  many  departed  Commodore  execs  which  have  ap- 
peared in  these  pages:  Jack  Tramiel,  Marshall  Smith,  Thomas  Rattigan,  and  Nigel 
Shepherd,  to  name  a  few.  We  learned  in  early  April  that  Rich  Mclntyre,  a  key  Com- 
modore figure  (interviewed  in  a  1988  Gazette)  had  departed.  And  then,  in  late 
April,  wo  were  very  much  surprised  to  hear  that  Max  Toy,  Commodore's  president 
and  chief  operating  officer  of  U.S.  operations,  had  resigned  {we  had  spoken  with 
Toy  at  the  Spring  COMDEX  Commodore  booth  less  than  two  weeks  before  his  res- 
ignation). Toy  had  come  to  Commodore  18  months  eariier  with  high  hopes  and 
great  expectations  on  the  part  of  CEO  Irving  Gould.  Gould  wasted  no  time  in  nam- 
ing a  replacement.  Harold  Copperman  replaced  Toy  on  April  24,  the  day  of  Toy's 
official  resignation.  Copperman,  42,  is  the  former  vice  president  and  general  man- 
ager of  Eastern  Operations  for  Apple  Computer.  Prior  to  that,  he  served  for  20 
years  vvithJBM. 

The  U.S.  market,  unlike  that  of  Europe,  has  been  stagnant  for  Commodore, 
and  it's  a  good  guess  that  Gould's  patience  was  wearing  thin.  So  what  will  bo  ex- 
pected of  Copperman?  Mehdi  All,  president  of  Commodore  International,  stated, 
"We  want  to  make  further  forays  into  education  and  business,"  which  says  to  us 
that  Commodore  wants  the  Amiga  to  be  taken  seriously  in  the  schools  and  in  the 
office.  The  64  and  128  are  not  focal  points  in  Commodore's  plans. 

In  the  past  six  years.  Commodore,  like  the  entire  personal  computer  industry, 
has  been  unpredictable  and  erratic.  Nevertheless,  there's  always  been  excite- 
ment— and  a  lot  of  surprises.  There's  never  a  dull  moment. 

Whatever  Commodore's  plans,  be  assured  that  Gazette  will  continue  to  enthu- 
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siastically  support  the  64  and  128. 
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AiMfssiail  adveftsir^  rc-atefialfi  to  Aniij  AitrnfieH,  COMPUTE' 
PuUfcattirtt,  !rtc  .  32-1  West  We™;lc7vw  jMi  .  Sute  200  Grwwficro. 

1^27408 ^ 

tcjistwal  mcpjines  yia*l  t«  aOdress^Kl  10  Th«i  E(Mor,  CXJMPUTE'  S 
Gn^pfle.  Strng  ?00.  2i*  Wost  VtfBaxlotffw  Aw  ,  G-egrnDofO.  HC  27408 

PflirJTED  ll^THL  USA 
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Send  questions  or  comments  to  Letters 
to  the  Editor,  COMPUTEl's  Gazelte, 
P.O.  Box  5406,  Greensboro,  North 
Carolina  27403.  We  reserve  the  right 
to  edit  letters  for  clarittf  and  length. 

Mysterv  Solved 

In  response  to  "Missing  in  Canada" 
(May),  I  have  an  answer.  Traile.x  64/128 
is  now  published  by  Logibec  Groupe 
Informatique,  who  markets  the  product 
under  a  different  corporate  name,  Logi- 
ciel  Tanda.  The  address  is 

Logiciel  Tanda 

1,  Place  du  Commerce 

Bureau  410 

He  des  Soeurs 

Quebec,  Canada  H3E  1A2 

Gilles  Bernicr 
Gathteau,  Quebec 

A  special  thanks  for  your  detective  work, 
Gilles. 

Marauiting  by  Mail 

Members  of  our  user  group  have  re- 
ported that  they  have  written  to  several 
user  groups  (listed  by  you  and  by  other 
magazines)  that  appeared  to  be  general 
groups  serving  more  than  a  local  area. 
In  many  cases,  they  found  that  some  of 
these  "user  groups"  are  an  individual 
who  is  in  the  business  of  selling  soft- 
ware, often  pirated.  Other  groups 
turned  out  to  be  devoted  to  trading  soft- 
ware, much  of  it  pirated.  You  might 
want  to  address  this  by  including  some 
kind  of  statement  in  your  "User  Group 
Update"  column, 

jean  Nance,  President 

Meeting  64/128  Users  Through  the  Mail 

Si.  Joseph,  IL 

Thanks,  Jean.  V^e'll  include  such  a  stale- 
menl  in  "User  Group  Update"  beginning 
with  this  issue.  COMPUTE!  strougl}/  op- 
poses software  piracy  in  any  form. 

Don't  Hammer  That  64 

I'd  like  to  tell  Bill  Pullman  ("Hammer- 
ing the  64  to  Death,"  April)  that  if  he 
cannot  get  any  satisfaction  from  a  64 
that  he  won't  get  any  from  any  other 
computer.  If  Bill  buys  another  machine, 
like  an  Apple  IIgs,  he'll  probably  send 
the  same  kind  of  letter  he  sent  you  to  an 
Apple  magazine. 

Andy  Orthmann 
Lfl  Center,  WA 


In  response  to  Bill  Pullman's  letter,  I'd 
like  to  say  think  twice  before  hammer- 
ing your  64.  You  have  a  computer  that's 
almost  a  legend  in  the  computer  busi- 
ness. It's  survived  since  1982, 

Diego  Zamboni 
Baja  California  Sur,  Mexico 

I  suggest  that  Bill  Pullman  read  his 
owner's  manual.  He'll  find  that  there's 
a  switch  in  back  of  the  1525  printer 
marked  T,4,5.  The  T  is  for  test  patterns, 
and  if  the  switch  is  set  there,  that's  all 
he'll  get.  He  should  set  his  switch  to  4. 
Also,  if  he  wants  to  smash  his  64  and 
printer,  fine — but  it  would  make  more 
sense  to  sell  it  and  use  the  money  to 
buy  a  new  computer. 

Dan  Hunter 
Rohnert  Park,  G4 

AtivicB  on  Printers 

Thanks  for  the  info  or  printers  ("The 
Care  and  Feeding  of  Dot-Matrix  Print- 
ers," May).  The  article  recommends  the 
use  of  WD-40  on  printhead  guides.  I've 
found  that  WD-40  causes  a  gummy- 
substance  buildup.  I'd  recommend  a  sil- 
icone product.  Also:  A  pox  on  printer- 
ribbon  manufacturers  who  do  not 
identify  the  ribbon  by  number  on  the 
plastic  case.  After  you've  thrown  the 
box  away,  you  no  longer  have  an  iden- 
tification number. 

William  Bernheitn 
Oroville,  CA 

Although  "The  Care  and  Feeding  of 
Dot-Matrix  Printers"  article  is  informa- 
tive, some  points  are  not  necessarily 
true  for  all  printer  models.  For  instance, 
the  statement  "Apply  a  little  light  oil 
occasionally  to  the  printhead  guides  .  , ," 
is  not  entirely  true.  Some  printer  manu- 
facturers do  not  recommend  using  any 
kind  of  lubrication  on  their  printers.  On 
most  printers,  the  printhead  is  mounted 
to  a  carriage  assembly  which  rides  on  a 
carriage  stay.  Usually  the  carriage  as- 
sembly contains  oilite  bearings  that  do 
not  require  any  lubricant.  In  fact,  lubri- 
cating the  carriage  stay  could  damage 
the  bearings.  If  the  bearings  do  require 
lubrication,  then  a  commercial  lubri- 
cant such  as  Tri-Flo  is  recommended. 
Unlike  WD-40  or  sewing  machine  oil, 
this  lubricant  is  teflon  based  and  does 
not  have  a  tendency  to  attract  dirt  or 
dust  particles. 


Cleaning  the  platen  with  alcohol  is 
not  a  good  idea  because  not  all  platens 
are  manufactured  from  the  same  sub- 
stances—alcohol could  damage  the 
platen.  Platen  cleaner  is  recommended 
and  can  be  purchased  from  most  office- 
supply  and/or  computer  stores. 

In  addition  to  the  label  information 
given,  the  labels  should  be  of  good 
quality,  preferably  adhesive  labels  with 
rounded  corners.  Labels  of  this  quality 
have  less  of  a  tendency  to  catch  on  any 
printer  parts. 

Robert  L.  Loar 
Mission  Viejo,  CA 

Robert  Loar  is  a  printer  technician.  We  al- 
ways appreciate  and  welcome  this  kind  of 
feedback  from  readers. 

Programming  Pros  and  Cons 

I'm  starting  to  learn  programming  on 
the  64  and  would  like  some  advice. 
What  are  the  pros  and  cons  of  program- 
ming a  64?  If  this  is  not  a  good  computer 
to  learn  programming  on,  what  is? 

Chris  Otvera 
APO,  NY 

You'd  no  doubt  get  a  variety  of  opinions  if 
you  asked  a  variety  of  programmers.  One 
opinion  is  that  the  64  is  an  excellent  ma- 
chine [or  programmers  because  its  design 
includes  a  built-in  BASIC  and  a  good 
screen  editor— and  it  permits  various  lev- 
els of  control  over  graphics  and  sound. 
Another  point  in  its  favor:  There  are  many 
excellent  books  and  programming  tools 
available  for  the  64.  Gazette  teaches  pro- 
gramming on  a  regular  basis  in  "BASIC 
for  Beginners"  and  "Machine  Language 
Programming,"  Millions  of  people  have 
learned  to  program— and  program  welt — 
on  tlie  64. 

Another  opinion  is  that  the  64  forces 
you  to  work  with  a  limited— but  arguably 
adequate— BASIC  language,  a  slow  disk 
drive,  memory  constraints,  and  a  relatively 
slow  microprocessor.  The  hardware  limi- 
lalions  make  it  difficult  to  program  in  any 
structured  language,  such  as  Pascal,  C,  or 
even  BASIC. 

If  you're  going  to  learn  to  program  in 
machine  language,  the  64  is  a  great  choice 
because  of  the  control  afforded  by  its  cus- 
tom soutid  and  graphics  chips.  If  you  want 
to  stick  with  BASIC,  consider  a  128;  its 
BASIC  7.0  IS  excellent^ar  superior  to  the 
BASIC  2.0  of  the  64.  g 
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Software  Sales  Up 

Consumer  Software  sales  were  up  26 
percent  in  1988  as  compared  to  1987 
according  to  the  Software  Publishers 
Association,  a  principal  trade  group 
made  up  of  over  440  members  who 
represent  publishers  in  the  consumer, 
education,  business,  and  vertical  mar- 
kets of  the  software  industry. 

The  compiled  data,  which  was 
provided  to  an  accounting  firm  from 
approximately  40  consumer  software 
firms,  accounted  for  over  $465  million 
in  1988  domestic  retail  sales.  The  term 
consumer  software  refers  to  personal 
computer  programs  used  primarily  by 
individuals  in  a  home  environment 
and  includes  computer  games,  person- 
al graphics  and  financial  programs, 
and  home  educational  titles. 

The  SPA  reports  that  recreation 
software  sales,  which  comprised  57 
percent  of  overall  consumer  software 
sales  in  1988,  has  been  dominated  by 
the  MS-DOS  format  in  the  past  two 
years,  taking  the  place  of  the  former 
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number  1  selling  format,  the  Commo- 
dore 64/128.  The  SPA  attributes  this 
newfound  dominance  to  the  increasing 
popularity  of  the  IBM  PC  and  compa- 
tibles in  the  home  and  the  growing 
availability  of  high-quality  MS-DOS 
recreation  software  with  enhanced 
graphics  and  sound  capabilities. 

According  to  the  SPA,  approxi- 
mately 44  percent  of  total  consumer 
software  sales  is  attributed  to  MS- 
DOS  software,  26  percent  to  Apple  II, 
16  percent  to  Commodore  64  and 
128,  7  percent  to  Macintosh,  and  6 
percent  to  other  computer  formats,  in- 
cluding the  Amiga  and  Atari  ST. 

The  SPA  first  began  to  monitor 
domestic  retail  software  sales  in  1984 
and  has  since  determined  that  the  in- 
dustry has  grown  approximately  177 
percent  with  an  average  yearly 
growth  of  31  percent.  During  this 
same  period,  the  SPA  has  estimated 
that  MS-DOS  consumer  software  sales 
have  increased  1214  percent — from 
approximately  S15  million  in  1984  to 
$203  million  in  1988. 


Word  Processing 
for  128~CP/M 

The  Public  Domain  Software  Copying 
Company  (33  Gold  Street,  Suite  L-3, 
New  York,  New  York  10038)  now  of- 
fers WordSlar  version  2.26  ($39.95)  for 
Commodore  128  CP/M  users. 

This  version  includes  MailMerge, 
which  allows  users  to  merge  text  and/ 
or  data  files  to  generate  form  letters, 
boilerplate  text,  mailing  lists,  and 
large  documents.  The  version  comes 
complete  with  an  Osborne  1  User's 
Reference  Guide,  which  explains  how 
to  use  WordStar  and  includes  sections 
on  the  CP/M  operating  system.  The 
guide  also  describes  how  to  use  other 
programs  available  from  PDSC,  in- 
cluding SuperCaic  and  Microsoft 
BASIC.  The  package  also  contains  a 
set  of  Key  Fronts,  self-adhesive  letters 
that  attach  to  your  keyboard  and  in- 
clude all  the  commands  needed  to  use 
the  special  word  processing  functions 
of  ViordStar. 


Freebies 

Buy  two  Cine  ma  ware  games  and  re- 
ceive a  third  game  free.  Purchase 
choices  include  Cinemaware  titles  such 
as  Rockei  Ranger  and  The  Three  Stooges, 
Spotlight  titles  including  Total  Eclipse 
and  Speedball,  and  any  other  titles  that 
were  released  through  June  1989. 

In  order  to  receive  the  free  soft- 
ware, you  must  send  in  the  original 
dated  sales  receipts  from  your  two 
purchases,  the  completed  registration 
cards,  a  coupon  found  in  specially 
marked  packages  and  available  from 
many  software  retailers,  and  $3  for 
shipping  and  handling.  You  can 
choose  either  Defender  of  the  Crown  or 
Sinbad  and  the  Throne  of  the  Falcon  as 
your  free  game. 

The  "Buy  Two,  Get  One  Free!" 
offer  is  available  only  through  Cin- 
emaware (4165  Thousand  Oaks  Boule- 
vard, Westlake  Village,  California 
91362)  and  is  good  while  supplies  last. 


NEW! 


ACTION   REPLAY  v5.0 

THE  ULTIMATE  UTILITY  /  BACKUP  CARTRIDGE  FOR  THE  C64/128 


•  Acllon  Replay  allows  you  to  Fieeze  the  actlqn  of  any 
Memoty  Hesldeni  Program  ond  mokejaicomplete  back- 


EuM)  soo  (ffiSi  w-iiin>ii 


ONLY 


SUPER  CRUNCHER  -  ONLY  $9.93 

•  A  utiitly  ta  ium  your  Acti&n'  Replay  5  into  & 
super^powflriul  pfog-am  compacroT.  Reduce 
Ijroorams  by  14)  IB  50°.i'  Fur;fiet  compaa  pra- 
grams  jirMdy  aucMi  tiy  AR5  s  conpactor 

GRAPHICS  SUPPORT  DISK- 
ONLY  $19.99 

To  l^Q  attvancage  0I  Af^'s  unique  ^uwer,  we 
hivs  predaiM  <i  su*  ol  giajjhic  supota)  taoli!*;. 

•  SCREEN  VIEWER:  View  scthib  <i  a  sS* 
show  s«jue(!ca. 

•  MESSAGE  MAKER:  Add  sooSing  messages 
B  ydur  saved  scteens  wi*'  music. 

•  PROSPFITEiAluRspnteeditw. 

■  ■  ZOOM  LEWS:  Explode  isagm  oH  an^  saved 
saMntolullstie. 


■'.lt\/-i' 


$9^ 


•AV,-.-sv  V 


WARP  25 

Tlio  wwJid's  iastesi  disk  serial  Turbo  A  lypical  ba*up  win  reload  In  imder  5  seconds. 

*  No  Sfrtdal  normals  —  w!h  action  replay  jrou  simpi)^  save  dired-V  'ritCi  WafD  ?5  siatus,  I 
'   Backup  ^  ytxjr  ev^t^  proQ^ams  to  load  al  \ir<ixt'<&</Si:k  fpMKJ' 

'   Warp  SavfllMd  Ava?abta  stra;grit  Ifom  Base. 

RAMLOADER 

■  Vo-j  can  also  toad  fciadrriJ3S(  of  yoLiroimrTierdalorigirials  25  tirries  faster!  Wilh  OUT  spMl^^  ! 
pfEjce&sor  and  SK  of  onboard  Ram,  Action  Replay  oflers  th*  world's  fastest  Disk  Serial  Turbo. 

UNIQUE  CODE  CRACKER  MONITOR 

'   Ffeeze  amy  proffram  an^l  if\t,n  a  ?ulk  mxJtme  code  rrxjniitof . 

*  Full  Monitor  Features. 

-  Because  ol  Adion  Rsplary's  on  BoartI  Ram  ihe  program  can  be  loohtti  at  ^  its  ENTIRETY.  Thai 
m&ans  you  soe  tfie  coda  in  its  Frozen  Eiat^  not  in  a  Restil  stale  as  wlifi  competiiors  proAjaa. 

MORE  UNIQUE  FEATURES 

'   S^pie  Operatcn'  Just  pfes  ^  tx/Hon  a!  any  potnl  and  make  a  ccmptole  bad^HJp  of  any* 

r^emory^  resident  program  lo  ',^  or  risk. 
'   Turbo  Reload.  All  back-ups  feioad  compietefy  indeperident  ol  ttie  cartridge  at  Tyrt»  spwd- 

*  Sprrtfl  Moriitc*;  View  the  Spnie  Sel  Jrofn  If^  ^P^efl  pnagram  —  save  Itie  Sprite — tiansler  Itie  Spdte 
from  on&  gome  1q  another.  Wipe  oul  Sprites,  view  ihs  animatxHi  on  scresn.  Create  custom 
programs 

■  ^irite  Kilter  EffecWa  on  most  programs  —  make  yoursell  MiwioWe.  DS3t^  ^tft'SpntS/Bidl' 
ground  COfflrS^S 

'  Uniquo  Pclure  Save  Freeze  and  save  iiny  Hir«  Screen  to  lape  or  ctek  Saved  tn  Kollt.  Bluing 
padcSes  lormat. 

■  Compactor:  Etlioaoi  co^padi/^  te<^nigues  —  3  programs  per  disk  —  E  if  ytxj  use  both  shies. 

■  SingEg  File;  All  iprograms  saved  as  a  sinQle  Ills'  Ici"  maxinium  compa^bility. 

■  Utiiity  Comimands:  Many  adt^ional  commands:  Autonum,  Append,  Old.  Delete,  Linesaver.  etc. 

■  Screen  Dump-  Prir.t  out  any  scresn  in  1  €  Gray  ScaSes,  Ooutfe  sjze  pnnt  ootbns. 

*  Unstopjjabie  Reset:  Reaei  Ixfion  lo  Relieve  System  end  Rfrset  even  so  caBed  Unstoppabte 
Programs. 

-  Fully  Coo^palibfe  WorltswmiS^lC'll,  1581,  t57l  a™J»^bC64jra.orl2BO(in64ModB) 

*  Dish  Utilittes:  Fasi  Format,  Directtxy.  Let,  Run  ar»d  many  04h»r  key  coniman<te  afe  operaied  fcy 
Functtm  Kays, 

*  Unique  Restart:  Remember  all  of  those  utilllies  are  available  at  one  tim«  Irom  an  ifilergrattd 
cperaning  system.  A  mnning  program  can  bo  Frozerv  to  enter  any  Utility  and  fie  yograin  is 
restarted  at  tlie  touch  ol  a  key  —  without  corruption. 

*  LSI  Lo^  Processor:  This  is  wnere  Aoort  Re^iay  V  jett  us  pDwef.  A  specal  cusiom  LSI  chp 
designed  to  process  ttie  to^  necessary  lor  ttis  Limnatcned  Fr««z&Resian  power.  No  other 
cartridge  hs  ttiis  power! 


UPGRADE  ROM  -  ONLY  $16.99 

Give  your  AR IV  all  Ihe  power  of  Ihe  now  VS.O. 


DATEL 

COMPUTERS 


ORDERS*    1  -800-782-9 1 1 0 

MOM-SAT  SAM  -  5PM  (PST) 


CUSTOMER  SERV  TECH  SUPPORT 

702-454-7700 

TU-SA  10AM- 6PM 


CALL  US  FOR  THE  LOWEST  PRICES  ON  OTHER  HARDWARE  &  SOFTWARE 


DEEP  SCAN  BURST  NtBBLER  -  Only  $39.99  Complete 


1h&  most  poWGrTui  disk  ntbbler  availabf^  anvwhf>ro  at  ony  pricol 

Burst  Nlbbloi  /s  octuoSy  a  two- port  svstom  —  a  ioth«ora  pockog*  and  a  pofotet  coble  to  connect  tbo  1 541/1 571  to 

6(1/128  (stois  type). 

What  gives  Burst  Ntobl&r  lis  power?  Conventtonoi  nibblOB  havs  to  decodo  itio  dolo  from  tfie  disk  before  it  con 

trorefer  11  using  m©  serial  port  bus — wtven  oon-iiandexci  data  as  encountered  thoy  ore  b»a1.  BoRt  NtJbtet  ttonsfert 

data  OS  row  GCR  code  via  (tie  poroiiel  coWe  without  the  need  to  dectxfe  it.  so  you  get  a  perfect  copy  of  trie 

or^ifiQl. 

Will  nibble  up  to  ^1  lrack$  •  Copy  a  wt\ole  disk  in  uncfer  two  rnlnutos. 

FIttod  In  minutes  —  no  soldmlng  required  on  1541  (1S?1  requlrus  sotdeilng). 

Software  Only  $19.99  •  Cable  Only  $19.99 


iSf    iwrowMIR  M  -  6m,'ns9!w  complete 

I  lop  qualiiy.  oosy  to  use  EPROW  progfommer  for  Ihe  W/ 
128. 

■  Monu-drty«n  sorfwote/hardware  package  makes  pro- 
grammlno,  reading,  verlfytno,  copying  ETOOM's  simpBo- 
ity  tisolf. 

■  Program  2716  THRU  27256  chips «  12.521  or  2S  volts. 

■  fuS  feotute  system  —  all  functkjns  covaied  incKidIng 
cievsce  cnocWvsfity, 

I  The  most  comprehereh»e.fiien<ayoi>dbejt  value  for  the 
money  progiammei  avoBobto  for  M/i28. 

■  Ideal  companion  for  Stiporom  Ejiponder,  I6K  EPROM 
Boardorarjyfi  PI^OM-basod  project. 


256K  SUPEROM  EXPANDER  Only  $49.99 

-  8  sockoli  oack  occepl  flK  thru  32K  f?OM  or  EPTOM 
chips, 

•  On  board  operating  system  —  no  progroms  to  load, 

•  Menu  driven  —  just  press  □  key  to  kxxi  program, 

•  Select  any  sk>l  urxier  software  controls, 

•  Unique  EPffOM  a&netotoi  looturs  wia  take  yout  own 
pfogrami  —  basic  oi  mic  ond  fum  them  kilo  outostrat 
EPROMs  (EPITOM  burner  requifod) 

ROBOT  ARM  -  Only  $89.99 

•  Human-llkodextertly  to  ntanlpukite  small  objects 

•  Accotsorloj;  Commodoto  M  Intoffoce.  'Finger'  Jiaws, 
ShoveVScoop,  Mognolic  Attachment,  2  Joy  Stick) 

•  UsesJ 'D' sue  IxirteneiCnotincludsd) 
m    Wofks  with  or  wtlhouJ  Interface 

MIDI  64  -  Only  $49.99 

•  Fua  speclticotlon  MIDI  IntettocB  at  o  loalsilc  pitee. 
.    MIDI  IN  .  MIDI  out  •  MIDI  IHIMJ 

•  Compotiblo  wNh  Dbgilal  Sound  Sampler, 


DIGITAL  SOUND  SAMPLER  -  Only  $89.99 

•  Allows  you  10  record  any  sound  dfgrialty  inio  rrtemofv 
□nd  then  reptoy  it  wllh  astounding  offocts 

•  Playback  forwards/ bockwards  wllh  eoho/reverb/ilng 
modutation, 

•  MIDI  ccMTipotible  v;ilh  our  MIOi  64  ^tetfoc©. 

•  Full  sound  edHlnQ  ond  reoltlms  effects  menu  with  wave- 
fotms. 

•  Powerful  sequencer  plus  food/sove  functton. 

•  Uneln  —  MIC  in  — Line  Out  — Feedback  controls. 

TURBO  ROM  II  -  Only  $24.99 

•  A  ropkicoment  for  the  actual  kemol  inside  your  64, 

•  Loods/Soves  moil  progroms  at  5-6  Hmos  normal  speed, 

•  IfTiproved  DOS  supixjrtlnducftig  10  soc  format. 

•  Piogjtyrened  function  keyi:  Ujoei.  Directory .  CXd,  etc 

•  Return  to  noma!  kemol  al  fSck  of  a  swif  c  h, 

•  File  ci^^ter  •  SjseckJl  I/O  tooder  •  Plus  kits  more, 

•  Fitted  in  minutes  —  no  sokiering  usually  required, 

MOTHER  BOARD  -  Only  $29.99 

•  Soves  wear  on  expor%sion  port 

•  Accepts  3  ccxtridgre^  (swtichobte) 


TOOIKITIV-  Only  $14.99 

•  tho  uitimatf  disk  loolkit  tor  lh^5  1541  with  more  feotures 
thonrnost  tot  less, 

•  An  absolute  must  for  the  sorlous  disk  hacker, 

•  DISK  DOCTOR  V2  .  HEADER/GAP  EDITOR  •  DISK  LOOK  — 
Recover  lost  files,  Disossenibie  any  progtom  from  tt>e 
cfisJt  to  SCREEN  or  PRINTER.  Much,  much  mors, 

.    Fil£  CCMPACTOR  .  FAST  DISK  COPy  .  FASI  FILE  COPV 
.     1 0  SECOf^D  FOt^WTTER  •  IfJROft  EDTT  •  MUC« .  MOBE, 


SMART  CART  -  CARTRIDGE  ONLY  $59.99 

.NOW  VOU  CAN  HAVE  A  32K  CARTRIDGE  THAT  YOU  PRO- 
GRAM LIKE  RAM  THEN  ACTS  LIKE  ROM! 

•  32K  psuado-ROM  —  baftwy  booked  to  k3tl  up  (o  2 
yeofs, 

■    Make  your  own  cartrklge  —  even  oufo  stort  types  wttti- 
out  the  nstW  for  an  ER?OM  Butner. 

•  Con  bo  swilched  Sn/out  veq  soliwore, 

•  Turn  your  corlrideo  into  o  3SK  DAM  disk  with  our  RMd 

DISK  SOftWDtO 

•  SOFTWARE  ONLY  $14.99 
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Commodore  Revenue 
Increases 

Commodore  Interna- 
tional (1200  Wilson 
Drive,  West  Chester, 
Pennsylvania  19380) 
reported  that  sales  for 
the  second  fiscal  quar- 
ter, ending  December 
31,  1988,  increased  24  percent — to 
$349  million,  compared  with  $281.7 
million  during  the  same  period  last 
year. 

European  operations  accounted 
for  more  than  70  percent  of  total  sales 
for  the  December  quarter  according  to 
Irving  Gould,  chairman  and  chief  ex- 
ecutive officer  of  Commodore. 


DEC. 
1987 


DEC. 
1988 


Convoy  Escort  Service 

As  mentioned  in  last  month's  column, 
Destroyer  Escort  ($39.95),  a  naval  com- 
bat game,  has  now  been  released  by 
Medalist  International  (MicroProse 
Software,  180  Lakefront  Drive,  Hunt 
Valley,  Maryland  21030)  as  part  of  its 
new  MicroPlay  Software  line.  You  as- 
sume the  role  of  commander  of  a  de- 
stroyer escort  ship  in  the  North 
Atlantic  during  World  War  11. 

You're  responsible  for  the  safety 
of  a  World  War  II  supply  convoy  in 
this  one -player  game.  Choose  from 
six  convoy  routes,  each  with  three  dif- 
ficulty levels  and  different  challenges 
including  routes  prone  to  submarine 
attacks. 


The  Free-Spirited  128 

The  latest  Commodore  128  release  from  Free  Spirit  Software  (P.O.  Box  128, 
58  Noble  Street,  Kutztown,  Pennsylvania  19530),  Poster  Maker  US  ($29,95), 
allows  you  to  create  posters  as  large  as  5  X  5  feet. 

Print  out  posters  or  save  them  to  disk  as  picture  files.  A  graphics  utility 
permits  you  to  import  Baik  8,  Sketchpad  128,  or  Spectrum  328  graphics  files 
which  can  be  enlarged  on  both  the  x-  and  y-axes.  Also  included  is  a  clip-art 
creation  utility  that  reduces  the  size  of  graphics  screens. 

Poster  Maker  128  operates  on  the  Commodore  128D  or  the  Commodore 
128  with  a  64K  video  RAM  upgrade  in  128  mode  with  an  80-column  dis- 
play. Resolution  is  640  X  200  pixels.  A  1351  or  compatible  mouse  and  a 
1571  disk  drive  are  required.  Optional  support  is  provided  for  a  1571  or 
1581  disk  drive  as  a  second  drive. 

Free  Spirit  has  also  announced  an  agreement  with  Walrus  Software 
which  allows  it  to  publish  BaBic  8  ($39.95),  a  graphics  programming  system 
for  the  128  and  128D  in  128  mode  with  an  80-column  display,  Basic  3  adds 
over  50  new  graphics  commands  to  standard  128  BASIC.  The  programming 
environment  allows  640  X  200  resolution  in  monochrome  and  640  X  192 
resolution  in  16  colors  without  any  additional  hardware. 

Other  features  include  the  ability  to  draw  in  a  3-D  environment  and 
commands  for  windows,  fonts,  patterns,  and  brushes.  The  package  from 
Free  Spirit  includes  a  two-disk  set  containing  the  Basic  8  language,  RunTime 
library,  demonstration  programs  such  as  Bssic  Paint,  Basic  Calc,  Basic  Write, 
utilities,  and  a  new  200-pagc  manual. 

In  conjunction  with  the  Basic  8  announcement.  Free  Spirit  has  intro- 
duced Basic  3  Toolkit  (S19.95),  a  utility  program  for  use  with  the  graphics 
system.  The  toolkit  features  a  point-and-click  operating  system  that  allows 
the  creation  of  custom  pointers,  fonts,  patterns,  and  icons.  The  utility  also 
converts  Print  Shop  graphics  into  Basic  8  graphics  files.  Colors  can  be  added 
to  the  patterns,  icons,  and  Print  Shop  graphics  with  the  color  option.  The 
toolkit  also  contains  a  set  of  disk  utilities.  Files  created  with  B«sic  8  7"0(>/^ff 
can  be  used  in  custom  programs,  in  Basic  8  programs,  or  with  graphics  pro- 
grams such  as  Free  Spirit's  Sketchpad  128,  Spectrum  128,  or  News  Maker  128. 
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IVWff  naval  aclimt  in  Destroyer  Escort 

The  escort  ship's  weapons  in- 
clude torpedoes,  a  five-inch  gun, 
depth  charges,  and  an  antiaircraft  gun 
set  to  do  battle  with  submarines,  air- 
craft, and  surface  ships.  You  control 
the  ship  and  its  weapons  by  selecting 
from  seven  different  battle  screens. 


Tlie  Free-Spirited  64, 
Too! 

Free  Spirit  Software  (P.O.  Box  128,  58 
Noble  Street,  Kutztown,  Pennsylvania 
19530)  has  not  forgotten  the  64  user 
while  pursuing  the  128  market.  The 
company  has  released  an  updated  ESP 
Tester  ($24,95)  that  includes  both  the 
64  version  and  the  80-column  128 
version. 

ESP  Tester  uses  the  methods  de- 
veloped by  Dr.  j.  B.  Rhine  and  the 
Foundation  for  Research  on  the  Na- 
ture of  Man  to  test  powers  of  ESP. 
The  program  tests  for  clairvoyance, 
precognition,  and  telepathy.  Results 
can  be  displayed  onscreen,  or  they 
can  be  sent  to  your  printer. 

A  new  64  arcade  game  has  also 
been  relea.sed  by  Free  Spirit,  Players 
of  M.A.C.H.  become  the  ultimate  war- 
rior of  the  future,  a  M.A.C.H.  (Ma- 
neuverable  Armed  Computer  Human) 
who  is  equipped  with  deadly  hand 
rockets.  As  enemy  invaders  attack  the 
city,  the  mother  ship  releases  the 
M.A.C.H.  to  do  battle  with  enemy 
agents  that  become  more  difficult  to 
destroy  as  the  game  progresses.  Play- 
ers must  send  the  M.A.C.H.  back  to 
the  mother  ship  periodically  to  rearm, 
replace  armor,  and  recharge  fuel  cells. 
M.A.C.H.  retails  for  $29.95. 
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Bank  Street  Data 

Sunburst  Communications  (39  Wash- 
ington Avenue,  Pleasantville,  New 
York  10570}  recently  released  three 
new  databases  for  Batik  Street  School 
Filer  and  a  manual,  Bank  Street  School 
Filer  Workshop  Manual;  the  company 
has  also  announced  plans  for  a  new 
database-disk-exchange  program  for 
students. 

The  Our  Town  Databases  ($59) 
contain  starter  databases  that  focus  on 
the  theme  of  community.  Students 
can  research  and  explore  their  town's 
history,  buildings,  plant  and  animal 
life,  and  important  people,  places,  and 
events;  then  they  can  fill  in  database 
records  with  their  findings. 

Designed  for  students  in  grades 
4-12,  the  database 
allows  students  to 
analyze  such  issues 
as  the  impact  of  the 
environment  on 
plants  and  animals 
in  their  town  and 
the  steps  food 
must  take  in  order 
to  travel  from  its 
point  of  origin  to 
the  local  grocery 

store.  A  complete  six-unit  curriculum 
is  included  in  the  Teacher's  Guide. 

Also  included  in  the  Teacher's 
Guide  are  instructions  for  participa- 
tion in  the  disk-exchange  program. 
After  students  finish  entering  data 
about  their  own  town,  they  can  take 
part  in  the  Our  Town  Database  (Ex- 
change, which  allows  students  to 
compare  and  contrast  their  own  com- 
munities with  other  towns  and  cities 
in  the  U.S.  and  Canada. 

Two  other  new  databases,  Cli- 


mate and  Weather  Databases  ($59)  and 
Colonial  Times  Databases  ($59),  have 
also  been  released  by  Sunburst. 

Climate  and  Weather  works  with 
Bank  Street  School  Filer  to  provide  stu- 
dents in  grades  4-12  with  information 
on  72  weather  stations  around  the 
world,  62  weather  stations  in  the 
United  States,  and  a  starter  database 
for  students  to  record  and  analyze 
their  own  information  about  local 
weather.  An  activity  in  the  accompa- 
nying Teacher's  Guide  has  students  as- 
suming the  role  of  employees  of 
Climate  Tinders,  a  travel  and  reloca- 
tion agency.  Students  must  make  trav- 
el arrangements  for  clients  based  on 
their  weather-condition  requests. 

Colofiial  Times  works 
with  Bank  Street  Be- 
ginner's Filer  or  Bank 
Street  School  Filer. 
Seven  different  data- 
bases contain  infor- 
mation on  historical 
and  other  aspects  of 
the  13  colonies,  in- 
cluding prominent 
Native  American 
tribes;  significant 
political  events;  the  lives  of  various 
patriots;  descriptions  of  the  jobs  per- 
formed; information  on  games,  reci- 
pes, remedies,  and  crafts;  and  profiles 
of  four  fictional  and  one  actual  colo- 
nial family.  Teacher's  Guide  activities 
are  designed  to  give  students  in 
grades  2-6  examples  of  colonial  life. 
Sunburst  has  also  released  Bank 
Street  School  Filer  Workshop  Manual 
(569).  The  manual  includes  a  com- 
plete set  of  training  materials  to  help 
teachers  in  the  classroom. 


Leisure  Genius  Breaks  from  EA 

Electronic  Arts  has  announced  that  its  distribution  agreement  with  England- 
based  Leisure  Genius/Virgin  Games  has  ended,  and  that  Virgin  Games  will 
begin  distributing  its  products  through  its  American  subsidiary.  Virgin 
Mastertronic.  EA  will  continue  to  distribute  Arcadia  games  for  Virgin 
Mastertronic. 


Commodore  Loses 
European  Head 

Harald  M.  Speyer,  head  of  European 
operations  for  Commodore  Interna- 
tional, resigned  on  January  31  accord- 
ing to  Business  Week.  The  48-year-old 
West  German  helped  Commodore 
avoid  potential  financial  ruin  in  1985 
and  1986  by  selling  IBM  PC-compati- 
ble computers  to  West  German  busi- 
nesses while  the  U.S.  home  computer 
market  was  growing  soft. 

Speyer  had  expanded  sales 
throughout  Europe,  which  accounted 
for  70  percent  of  Commodore  sales 
during  the  latter  portion  of  1988.  Ger- 
man sales  presently  account  for  30 
percent  of  Commodore's  worldwide 
business.  Sales  of  the  Amiga  line  have 
also  boosted  Commodore's  share  of 
the  European  market  from  2.7  percent 
in  1987  to  3.5  percent  in  1988.  Com- 
modore International  President  Mehdi 
R.  Ali  has  not  replaced  Speyer,  who, 
according  to  Business  Week,  is  looking 
for  a  company  to  buy. 


Don't  Get  Burned 

Miles  Computing  has  released  The 
Magic  Candle  ($39.95),  a  medieval 
fantasy  role-playing  game  designed 
and  published  by  Mindcraft  and  dis- 
tributed by  Electronic  Arts  (1820 
Gateway  Drive,  San  Mateo,  California 
94404). 

You  must  save  the  land  of  Deru- 
via  from  the  wrath  of  the  archdemon 
Dreax,  who  has  been  imprisoned  with- 
in the  flame  of  the  magic  candle.  Stop 
the  candle  from  melting  before  Dreax 
escapes  and  wreaks  havoc  on  the 
peaceful  land  of  Deruvia.  During  your 
adventure  in  Deruvia,  you'll  encounter 
elves,  dwarves,  goblins,  wizards,  and 
any  of  26  types  of  monsters.  To  de- 
fend yourself,  you  can  utilize  sword 
swinging,  fireball  throwing,  or  the 
casting  of  one  of  24  magical  spells. 
With  a  team  of  25  characters,  you  can 
explore  54  levels  of  dungeons,  six 
towns,  six  villages,  and  two  castles.    6 
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Protecto's 


Since  1979 


COMPUTER  DIRECT 


WE  WON'T  BE  UNDERSOLD! 


IHPIRES  T-31-tf 


5V4"  Floppy  Disks 


Lifstima  Guarantas 
100%  Cart  Iliad 


Double  Density 
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Doubia  Danilly 
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No  Limit 


FREE  dATALd^ 


Call  For  Your  Free 

Ccrtalog  WIfh  Everything 

Yoii  Need  For  Commodore 


DISKS  •  MODEMS  •  DRIVES  •  FREE  CATALOG 


1 200  IoikI  Migent  Pocket  Modem 
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lale  Price 

$5995 


SUPER  SYSTEM  SALE 
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Summer  Sizzler 
Special  Sale 


*  C-64C  Computer  "^^P^^ 

*  GEOSdeskTop  ''^  ^^ 

i^  Quantum  Link 

Modem  Software 
^  Excelerotor  Plus 

Disk  Drive 
•ts  2  Arcade  -  Action 

games  from  EPYX® 


epyx. 


Our  Low  Sale  Price 


IMMEDIATE  ANSWER 

800  -  BUY  -  WISE    exta  1 1 


aOO  -  289-  9473    axl.  14 

Outjido  Service  Aroa  coll  31 2  382-5058 


l¥e  toire  Our  CuMtomorwl 

COMPUTER  DIRECT 
22292  N.  Pepper  Rd. 
Barrington,  IL  60010 


BEST  SERVICE  IN  THE  USA       Ml«  B  NOT  INOUOII I 

•  «  Dgy  Immadlale  Replgeament        •  Frao  Tschntcal  Auistanca      •  Fe«f ,  Low  Coit  Del t vary    •  15  Day  Home  Trial 

•  Experii  in  Cuitomor  Sallifoetlon      •  Bulletin  Board  Serwiea  •  No  Crodlt  Cord  F»«s  •  Free  Cafologi 


Mo  one  can  sell  thb  priater  for  less!! 

180  €PS  namat 


Super  Graphics  •  Near  Letter  Quality  •  Lifetime  Warranty^ 


Summer  Sizzler 
Speciai  SaSe 


Shinwa,  a  leader  in  electronics,  offers  advanced  square  dot  technology  that  allows  for 
perfect  vertical  &  horizontal  lines  and  superb  Near  Letter  Quality.  The  pressure  sensitive 
controls  are  conveniently  located  right  up  front  for  ease  of  use.  An  excellent  printer  buy! 

Super  Saver    $  ■  ^  A95 


Cot  No.  SWI09QX 


Print  Bulfer 

8K  bytes  utility  buffer 

Printlnii  Dlnclfon 

Text  Mode-  Bi-directional 

Grapiiic  Mode  -  Uni>directionat 

Paper 

Tractor /Friction  feed 

Plain  paper, roll  paper.single  sheet, 

Fanfold,  multipart  paperrmax.  3  sheets 

(original  plus  2  copies 

Chanicler  Fonts 

Pica,  Elite,  Italics,  Conoensed, 
Roman  NLO  font 


Priming  Method 
Impact  Dot  Matrix 

Printing  Speed 

180  CPS 

30  CPS  at  Near  Letter  Quality 

Printing  Characters 

Standard  9);9  dot  matrix 
NLQ  UxISdol  matrix  (33  cps) 
Character  size:  2.12  x  2.8  mm  (standard) 
Character  sets:  Full  ASCII  character  set  (96) 
32  International  characters 
Centronics  parallel  port 


Ink  Ribbon  Cariridge 

Ribbon  Life:  3  million  characters/cartridge 

Physical  Dimensions       Carriage 

Size:  15"  X  12"  X  5"        10  Inches 
Weight:  12.7  lbs. 

Maximum  Number  of  Characlera 

Standard:  10  cpi           80  cpl 

Standard  enlarged  i  cpi  40  cpl 

Elite:  12  cpi  96  cpl 

Elite  Enlarged:  G  cpi  48  cpl 

Condensed:  17  cpi  132  cpl 

Condensed  Enlarged:  8.5  cpi  66  cpl 

Condensed  Elite: ?0  cpi 160  cpl 


'Lifetime  Warranty  on  Prlntheod 


*2-year  Irrtmediote  Replacement  Warrar>ty  on  Printer 
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speakers,  Stereo,  and  MIDI  Solutions 

Art  Hunkins 

^^^  or  the  price,  you  can't  beat  the  64  (or  128),  with  its  proprietary  Sound  In- 

^^^-  terface  Device  (SID)  chip.  But  the  musical  capability  of  these  machines  is 

g^^     not  limited  to  a  single,  built-in  source.  Here  are  three  methods,  ranging 

W  from  simple  to  complex,  for  extending  and  improving  your  computer's 

'  sound  and  music  capabilities.  We'll  look  at  connecting  to  a  hi-fi  system, 

adding  stereo  SID,  and  using  your  64/128  to  control  a  MIDI  system. 


Interfacing  SI  I)  fo  lotir  Hifl 

The  simplest  way  to  improve  sound  quality  is  to  bypass 
your  monitor's  tiny  speaker  and  its  tinny  sound  and  hook 
your  computer  Into  your  home  hi-fi  system.  If  you're  using 
a  monitor  instead  of  a  TV,  you  already  have  one  of  the  re- 
quired cables;  an  eight-pin-DIN-to-multipIe-RCA-pIug 
cord.  This  is  the  cable  that  connects  to  your  monitor.  If  your 
hi-fi  amplifier  has  a  MONO/STEREO  switch,  you  need 
only  add  an  extension  cord  that  has  an  RCA  plug  on  one 
end  and  an  RG\  jack  on  the  other.  Lengths  range  from  3  to 
12  feet. 

Unplug  the  audio  lead  from  your  monitor  and  attach 
the  extension  cord.  With  the  amplifier  off,  connect  the  RCA  plug  to  an  available  am- 
plifier input,  either  left  or  right  channel.  This  can  be  AUX,  TAPE,  TUNER,  or  even  CD 
In — anything  except  magnetic  PHONO. 

Set  the  MONO/STEREO  switch  to  MONO  and  the  selector  switch  to  whatever 
input  you've  patched  into.  {If  you've  selected  TAPE,  switch  the  tape  monitor  control 
to  TAPE.)  Turn  your  amp  on,  and  your  computer  should  sound  from  both  speakers  of 
your  hi-fi  system.  Use  your  hi-fi's  tone  or  equalizer  controls  to  shape  the  sound  quali- 
ty to  your  liking. 

If  your  amplifier  doesn't  have  a  MONO/STEREO  switch,  you'll  need  one  more 
cable;  an  RCA-pIug  Y-connector  with  a  single  jack  and  two  plugs.  Again  with  the  am- 
plifier off,  attach  one  end  of  the  extension  cord  to  your  monitor  cable  as  before;  then 
piug  the  other  end  into  the  jack  on  the  Y-connector.  The  other  two  ends  of  the  Y  cable 
connect  to  the  left  and  right  amplifier  inputs  of  your  stereo. 

If  you're  using  a  TV  instead  of  a  monitor,  you'll  also  have  to  purchase  an  eight- 
pin-DIN-to-muItiple-RCA-pIug  cable.  Continue  to  use  your  TV  for  video— just  turn 
down  the  sound.  Attach  the  DIN  plug  to  the  rear  of  the  computer.  It  will  only  go  into 
one  socket.  Now  locate  the  audio  lead.  With  the  volume  down,  plug  each  lead  into  the 
amplifier  while  you're  running  a  program  that  produces  sound.  When  you  hear  the 
sound  on  your  amplifier,  you've  located  the  proper  lead.  The  video  lead  will  give  a  lot 
of  high-frequency  white  noise. 

The  Commodore  1902 A  monitor  presents  a  problem:  The  audio  output  is  not 
available  on  a  separate  connector.  Both  ends  of  the  cable  are  DIN  plugs.  To  use  it,  a 
special  cord  with  a  separate  pin  plug  for  audio  would  have  to  be  made — a  project  not 
suited  for  the  average  user.  ** 


Sure,  the  SID  chip  is  great,  but 
there's  still  lots  of  room  for    „^,^i 
improvement.  Here  are  three  ^Hj 

different  methods  for 
dramatically  expanding  the        •' 
sound  quality  of  your  64  or  128. 
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With  the  exception  of  the  eight-pin  DIN  cable,  which 
cnn  be  found  at  most  Commodore  outlets,  all  cables  are  sold 
at  Radio  Shaclc, 

SfD  Programs 

Even  the  best  sound  chip  and  hi-fi  system  are  of  little  value 
without  flexible  composing/arranging  programs,  arrange- 
ments to  play,  and  driver  programs  to  perform  them.  Fortu- 
nately, all  of  these  are  readily  available.  Prime  sources  for 
music  editors  (composing/arranging  programs),  players 
(play  programs),  and  music  files  are  user  groups,  bulletin 
boards,  information  services,  and  publications. 

Probably  the  best  SID  editor  is  Sidplaycr,  by  Craig 
Chamberlain.  Sidpta\/er,  originally  published  in  COMPUTE! 
Books'  AU  About  the  Conimodow  64,  Vohum:  Two,  was  entire- 
ly rewritten  for  both  the  128  and  the  64  and  appeared  in 


COMPUTEI's  Musk  System  for  the  Commodore  128  and  64: 
The  Enhanced  Sidplayer  (COMPUTE!  Books,  Chilton  Book 
Company,  Chilton  Way,  Radnor,  Pennsylvania  19089;  800- 
345-1214),  Sidptayer,  the  fullest  implementation  of  SID- 
chip  capability  I've  ever  seen,  is  a  composition  program  that 
should  be  in  the  hands  of  every  composer/arranger  for  SID. 

This  enhanced  version  is  available  only  with  a  disk 
($24,95)  and  contains  numerous  utilities  and  an  extended 
collection  of  musical  examples.  Original  Sidplsyer  files  are 
compatible  with  Enhanced  Sidplayer. 

Hundreds  of  arrangements  for  Sidptayer  are  available 
on  major  telecommunications  networks,  including  Quantum- 
Link,  CompuServe,  Delphi,  and  GEnie.  These  pieces  can 
also  be  played  via  stereo  SID,  which  is  discussed  later. 

With  enhanced  and  stereo  versions,  SID  becomes  a  sig- 
nificant medium  for  the  composer/arranger.  For  mono, 
stereo,  and  MIDI  applications,  perhaps  the  most  helpful 
SID  information  service  is  QuantumLink.  The  Quantum- 
Link  subgroup  for  musicians  is  the  Music  Room. 

Q-Link  is  where  Mark  Dickenson's  outstanding  soft- 
ware for  stereo  SID  is  available,  as  well  as  Chamberlain's 
recent  work  in  converting  SID  files  to  MIDI  playback.  (See 
the  discussion  of  MIDI  which  follows.)  Perhaps  the  simple 
realization  that  SID  files  can  now  be  played  through  MIDI 
is  a  further  reason  to  be  excited  about  composing  for  SID. 


East  Meels  Wesi 

ffituht  ^f^K':i(^  f'rofn  Te.ms—'f 

Few  Amerit^an  musicians  become  proficient  in  the  clas- 
sical music  of  India,  but  there's  a  Commodore  owner  in 
Houston  who's  an  exception.  This  Texan  plays  and 
composes  Indian  music,  has  written  a  book  about  it, 
and  teaches  it — with  a  little  help  from  his  64. 

David  Courtney,  who  is  wori<ing  on  a  doctorate  in 
ethno-musicology,  has  spent  most  of  his  adult  life 
studying  Indian  music.  For  the  past  three  years,  as  part 
of  his  doctoral  dissertation,  he's  been  working  on  a 
unique  musical  program  for  his  64  that  will  help  him 
teach  the  music  to  others. 

In  developing  the  software,  Courtney  overcame  sev- 
eral difffculties  not  encountered  by  Western  program- 
mers and  musicians.  Notation  is  a  particular  problem.  It's 
difficult  to  write  Indian  music  in  Western  staff  notation 
because  of  inherent  differences  in  the  Vi^ay  the  two  sys- 
tems express  mode,  tempo,  and  key.  It's  possible,  but  it 
forces  musicians  to  compromise  in  many  areas. 

To  avoid  these  compromises,  Courtney  incorporat- 
ed India's  Bhatkhande  (Sanskrit)  music  notation  into  his 
program.  As  a  composition  plays  on  the  64,  the  corre- 
sponding Bhatkhande  musical  symbols  scroll  across 
the  screen.  "This  visual  and  audio  feedback  is  very 
useful  for  a  beginning  student  to  acquire  a  sense  of  the 
notation  and  structure  of  the  music,"  Courtney  says. 

Students  using  Courtney's  program  can  accom- 
pany selections  recorded  on  the  disk,  or  they  can  input, 
edit,  and  save  their  own  compositions.  There's  even  an 
option  for  obtaining  Sanskrit  printouts  of  the  music  from 
a  dot-matrix  printer.  Similar  features  are  found  on  con- 
ventional music  programs,  but  Courtney's  system  deals 
v/ith  Indian  music  purely  in  Indian  terms. 
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David  Courtney  composes  Indian  music  with  a 
unique  program  he's  written  on  his  64.  Inset: 
Courtney's  personally  designed  Bhatkhande 
musical  notation. 
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Exftaiiitiitg  to  Stereo  S/D 

One  of  the  most  exciting  developments  in  SID  sound  is  ster- 
eo, A  plug-in  cartridge  furnishes  three  new  voices  for  the 
right  channel,  while  voices  from  the  built-in  chip  are  routed 
to  the  left.  Though  several  units  are  on  the  market,  the  best 
is  the  SID  Symphony  Stereo  Cartridge  ($34.95),  by  Dr.  Evil 
Laboratories  (P.O.  Box  190,  St.  Paul,  Indiana  47272). 

Essential  to  those  lacking  access  to  online-service  soft- 
ware is  a  $1  public  domain  disk  also  offered  by  Dr.  Evil,  It 
contains  the  latest  version  (version  10)  of  Mark  Dickenson's 
Stereo  SID  Player,  plus  a  sizable  six-voice  song  collection. 

Dickenson's  software  (available  on  Q-Link)  is  a  re- 
markable piece  of  work,  and  version  10  is  a  significant  im- 
provement over  earlier  editions.  It  is  the  first  to  support 
Chamberlain's  Enhanced  Sidplayer  additions.  It  also  offers 
significant  new  options  for  performing  mono  SID  songs  in 


realistic  pseudostereo.  The  principle  behind  stereo  SID  is 
simple;  Compose  two  Chamberlain  Sidplayer  files,  one  for 
the  left  channel  and  one  for  the  right.  Stereo  SID  Player  per- 
forms them  simultaneously. 

As  when  you're  using  mono,  you  need  Chamberlain's 
Enhanced  Sidplayer  if  you  want  to  create  your  own  arrange- 
ments. To  simply  play  files  and  experiment  with  stereo  per- 
formance options,  Dickenson's  Stereo  SiD  Player  is  all  you 
need.  In  a  nutshell,  Stereo  SID  Player  offers  everything  in 
stereo  that  Sidplayer  does  in  mono — and  more,  including 
transpositions,  programmed  replays,  and  a  jukebox  mode. 
Even  without  stereo  SID  files,  the  performance  options 
alone  justify  getting  into  Stereo  SID  Player, 

Stereo  not  only  gives  you  three  more  voices,  but  it  also 
permits  richer  sounds  through  voice  doublings  and  trans- 
positions. It  allows  spatial  manipulation  and  projection  of 
sounds  and,  in  general,  the  fuller  sonic  experience  we  have 
come  to  expect  of  stereo.  If  you  haven't  experienced  stereo 
SID,  you're  in  for  a  real  treat. 

Connecting  the  battery-powered  SID  Symphony  Car- 
tridge is  simple.  First,  with  the  volume  down  or  off,  connect 
your  norma!  audio  lead  (as  described  previously)  to  the  left 
channel  input  on  your  amplifier,  A  Y-connector  is  unneces- 
sary; instead,  obtain  an  RCA-plug  cable  the  same  length  as 
the  left-channel  extension  cord.  Select  STEREO  mode  if  you 


Courtney's  program  offers  students  bilingual 
menus  in  English  and  Hindi.  While  printing  English  text 
presented  no  problem,  Courtney  was  forced  to  create 
special  characters  using  a  technique  he  calls  pseudo- 
bilmapping  to  produce  the  Hindi  script  on  ttie  64. 

Bitmapped  graphics  would  provide  the  resolution 
required  for  reproducing  Hindi  text,  but  ttiey  vwDuld  also 
require  a  large  chunk  of  memory.  Pseudobitmapping 
basically  Is  the  same  as  redefining  characters,  Courtney 
explains,  but  it  takes  a  new  part  of  your  character  RAM 
and  defines  another  pseudoblt  buffer.  The  redefined 
Hindi  bit  patterns  are  kept  elsewhere  in  memory  until 
needed.  Then,  just  before  use,  they  are  transferred  into 
this  buffer,  where  they  can  then  be  called  from  either 
BASIC  or  assembly  language.  That  way,  you  get  the 
convenience  of  programming  English  text  in  text  mode 
while  getting  the  resolution  and  power  of  bitmapping 
through  the  pseudobitmap  buffer. 

Now  that  the  program  is  in  beta  testing,  Courtney 
is  negotiating  with  several  institutions  in  India.  By  next 
year  he  expects  to  have  the  first  computer-assisted  mu- 
sic-education program  In  that  country,  Courtney  hopes 
his  program  will  find  wide  acceptance  with  musicians, 
teachers,  and  others  Interested  in  the  traditional  music 
of  India. 

Courtney  himself  vras  introduced  to  Hindu  music 
as  a  teenager  through  the  recordings  of  Ravi  Shankar, 
the  internationally  renowned  master  of  the  sttar.  In  the 
1970s,  after  working  toward  an  engineering  degree  for 
two  years  at  Texas  A  &  M,  Courtney  decided  against  a 
technical  career,  pursuing  his  interest  in  Indian  music 
instead. 

After  tv«)  years  of  study  In  Caiifornia,  Courtney 
moved  to  India  in  1 976.  For  the  next  four  years,  he  ap- 
prenticed with  a  percussion  music  teacher,  studying  the 


tabia,  a  pair  of  drums  covered  with  goat  skin  and  buffa- 
lo hide,  Courtney  became  so  proficient  on  the  instru- 
ment that  he  wrote  a  book  on  the  subject  that  was 
published  in  India. 

Before  returning  to  the  U.S.,  Courtney  married  an 
Indian  who  is  herself  an  accomplished  singer.  They  txjth 
now  teach  at  a  school  of  Indian  dance  and  music  In 
Houston.  Most  of  their  students  come  from  the  commu- 
nity of  about  20,000  Indians  living  in  the  Houston  area. 

A  few  years  ago,  Courtney  decided  to  use  his  early 
interest  In  electronics  and  computers  to  help  him  teach 
students  to  play  the  tabla.  Students  practicing  these 
drums  usually  accompany  a  repetitive  musical  phrase 
called  a  lehra.  The  computer  is  an  Ideal  instrument  for 
playing  this  melody  since  It  repeats  the  phrase  at  a  con- 
stant speed  and  as  often  as  the  student  wishes.  As  a 
student's  skill  Increases,  the  lehra's  speed  is  easily 
Increased. 

The  Raga,  an  ancient  traditional  Hindu  melody,  Is 
as  rich  and  varied  as  any  music  found  In  Western  cul- 
tures, and  it  offers  a  wide  range  of  musical  texture,  or- 
namentation, and  elaboration.  But  India  Is  changing.  In 
many  ways,  the  country  Is  becoming  Westernized,  and 
Courtney  says  Indians  are  aisandoning  their  traditional 
music,  art,  and  culture.  Courtney  hopes  computers  can 
help  preserve  and  revive  this  ancient  musical  art  form 
by  making  It  easier  for  students  to  learn. 

Courtney's  program,  which  employs  easy-to-use 
menus,  is  designed  for  musicians  who  may  have  little  or 
no  experience  with  computers.  "I'm  trying  to  make 
things  as  simple  as  possible,"  he  says,  "because  I  want 
a  program  that  can  be  operated  in  India  by  musicians 
and  not  computer  lechles.  In  a  sense,  the  program  is 
structured  like  a  word  processor,  but  Instead  of  working 
with  words  and  numbers,  you're  working  with  ragas." 


COMPUTE!  s  Gazetre     July  13*9     15 


y 


have  a  MONO/STEREO  switch.  Attach  your  cable  to  the 
SID  Symphony  cartridge  and  the  right  channel  input  of 
your  amp, 

Tije  MIDI  Connection 

MIDI  (Musical  Instrument  Digital  Interface)  is  the  way  in 
which  computers  and  musical  instruments  exchange  infor- 
mation. With  a  64  or  a  128  controlling  one  or  more  MIDl- 
compatibie  instruments,  you  get  high-quality  audio, 
exciting  and  dynamic  sounds,  and  a  variety  of  live- 
performance  and  storage  options.  With  an  appropriate 
sequencer  program,  your  computer  practically  becomes  a 
multitrack,  editable,  digital  tape  recorder. 

It  is  beyond  the  scope  of  this  article  to  fully  explain 
MIDI  and  what  it  can  do  on  your  64  or  128.  Fortunately, 
information  is  available  from  many  sources;  a  particularly 
good  article  appeared  in  the  August  1988  issue  of  GazeUe. 
The  64  and  128  function  well  at  the  heart  of  any  but  the 
most  sophisticated  collection  of  MIDI  instruments,  and  they 
do  so  at  a  considerably  lower  cost  than  other  systems.  This 
is  not  to  say  that  MIDI  comes  cheap;  it  doesn't.  Even  an 
entry-level  system  costs  a  minimum  of  $120  (compared  to 
$35  for  stereo  SID), 

TJjv  SFX  Souml  Expamler  ami  Software 

The  low-cost  way  to  get  into  the  wonderful  sounds  and  mul- 
tiple voices  of  FM  synthesis  and  MIDI  is  with  a  cartridge  de- 
signed specifically  for  the  64  and  128 — the  SFX  Sound 
Expander.  The  Sound  Expander  is  produced  by  Commodore 
Great  Britain  and  is  distributed  in  the  U.S.  by  Feam  &  Music 
(519  West  Taylor  #114,  Santa  Maria,  California  93454;  800- 
447-3434),  The  SFX  Expander  (FM  Sound  Module)  itself  sells 
for  $90,  while  the  mandatory  (and  highly  protected)  FM 
Com  poser/ Sound  Editor  software  goes  for  $30. 

An  external,  full-sized,  five-octave  keyboard  is  avail- 
able for  $80,  but  with  the  limited  note-entry  capability  of 
the  Com  poser/ Editor,  1  am  not  convinced  it  is  worth  the  in- 
vestment. The  keyboard  is  simply  a  control  device.  It  does 
not  produce  sound  and  is  not  involved  in  playback,  but  it  is 
an  inexpensive  way  to  program,  store,  and  play  your  own 
FM  sounds. 

One  of  the  real  limitations  of  the  Expander  system  is 
that  its  external  keyboard  cannot  be  "recorded"  by  the  com- 
puter in  realtime,  though  it  can  be  played.  When  you're 
composing  or  arranging,  the  keyboard  furnishes  pitch  data, 
one  event  at  a  time.  This  is  a  feature  of  the  Composer  soft- 
ware, which  operates  only  in  step-time.  This  is  not  a  full- 
featured  sequencer  program.  A  small  keyboard  overlay, 
offered  at  $10,  may  be  more  convenient  than  A5CU  key- 
board note  entry,  even  when  assisted  by  the  included  stick- 
on  note  tabs. 

The  SFX  Sound  Expander  uses  the  same  kind  of  chip 
found  in  Yamaha  synthesizers— a  simple  FM  system  with 
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two  operators  (Operator  Type  Lll,  or  OPLII).  Forty -eight 
sounds  are  available  at  once,  and  most  of  them  are  of  high 
quality.  Unfortunately,  the  software  offers  only  one  bank, 
along  with  three  expander  sets  of  12  sounds;  you  have  to 
create  others  yourself.  Up  to  nine  notes  can  be  played  at  a 
time,  or  six  pitches  plus  five  preset  percussion  voices.  Fixed 
rates  (a  hardware  limitation)  of  tremolo  and/or  vibrato  can 
also  be  added  to  either  tone  generator  (operator). 

The  editor  software  allows  you  to  program  a  keyboard 
split  point  so  that  pitches  above  the  point  have  one  tone 
quality,  and  those  below  it,  another.  The  real  joy  of  this  sys- 
tem is  its  multitimbral  playback  capability.  In  the  Compos- 
er, assign  each  of  the  nine  voices  a  different  color  and 
change  colors  wherever  you  wish.  Dynamics,  articulation 
(whether  notes  are  connected  or  not),  and  transposition  are 
also  independently  controllable  in  each  voice. 

The  Sound  Editor  is  solid,  if  not  elaborate;  it  serves  as  a 
fine  hands-on  introduction  to  FM  sound  synthesis.  The  seven- 
page,  well -produced  manual  suggests  that  FM  synthesis  is 
difficult  to  understand  (which  is  true),  so  the  Editor  offers  a 
simple  approach  to  producing  sounds.  You  visually  spin  a 
Fruit  Machine — the  British  term  for  a  slot  machine — to  gen- 
erate sounds  with  a  variety  of  random  parameters,  You  can 
then  immediately  play,  study,  edit,  and  save  these  "found 
sounds."  This  is  a  significant  learning  tool.  The  Editor  also 
includes  a  basic  eight-beat  percussion  sequencer.  Rhythm 
Machine,  capable  of  real-  or  step-time  programming.  It  of- 
fers a  choice  of  ten  different  preset  drum  kits. 

The  system  has  a  number  of  significant  limitations.  The 
Composer/Editor  software  includes  just  one  song.  The  disk 
accompanying  the  Expander  hardware  has  only  three. 
There  is  little  integration  of  Composer  and  Sound  Editor 
programs;  you  must  completely  leave  one  before  entering 
the  other.  The  two  programs  can't  even  play  each  other's 
songs,  in  particular,  the  basic  Expander  program  cannot 
perform  arrangements  you  make  with  Composer;  this  is 
unfortunate. 

The  external  MIDI  implementation  is  also  spotty. 
There  is  no  way  to  feed  in  externa!  MIDI  song  files  (or 
sound  libraries)  from  other  systems. 

You  need  an  additional  MiDl  interface  just  to  connect 
any  other  instrument  to  the  system,  either  for  note  entry  or 
playback.  Though  the  Expander  contains  an  interface  slot 
(so  that  the  Expander  and  an  external  MtDI  keyboard  can 
play  back  together,  creafing  rich  textural  overlays),  the  only 
compatible  interface  is  the  SFX  Interface  ($64),  from  Date!. 
(Software  designed  for  the  Date!  interface  is  rare.) 

You  can  use  an  external  MIDI  keyboard  or  drum  ma- 
chine with  an  SFX  Interface  for  step-time  note  entry  and 
stand-alone  performance  if  you  wish.  By  this  time,  how- 
ever, you've  pretty  much  invested  in  a  full  MIDI  system, 
and  it  might  be  better  to  forget  about  the  Expander  and  go 
with  more  flexible  software. 

Nevertheless,  for  just  $120  you  can  purchase  an  SFX 
Sound  Expander  and  FM  Composer/Sound  Editor  software 
to  write  your  own  arrangements  in  step-time,  hear  them  in 
up  to  nine-voice,  multitimbral  playback,  and  generally  ex- 
periment with  the  fascinating  world  of  FM  sound. 

You'll  have  to  live  within  strict  limitations  imposed  by 
the  program,  and  you'll  have  to  he  fairly  self- sufficient. 
Only  one  program,  the  FM  Composer/Sound  Editor,  is 
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Choose  training 
ttidt's  right  for  today's 
good  jobs 


'COMf'UtERr 

— SERVICE- 

JOB£ 


2000 


Jobs  (or  Lotnputer  service  technicians 
will  almost  double  in  the  next  10  years, 
accordiny  to  llie  latest  Department  of 
Labor  projections.  For  you,  that  means 
unlimited  opportunities  for  advance- 
ment, a  new  career,  or  even  a  com- 
puter service  busi  n  ess  of  you  r  own ,        1 9S9 

But  to  succeed  in  computer  service  today,  you  need  training- 
complete,  practical  training  that  gives  yiui  the  confidence  to  service  any 
brand  of  computer.  You  need  NRi  training. 

Only  NRI— the  leader  in  career-building,  at-home  electronics  training 
for  73  years— gives  you  practical  knowledge,  hands-on  skill,  and  real- 
world  exi)erience  with  a  powerful  XT-compatible  computer  you  keep. 
Only  NRI  starts  you  with  the  basics,  then  builds  your  knowledi{e  step  hy 
step  until  you  have  everytliiii^  you  need  for  a  fast  start  as  a  high-paid 

computer  service  technician. 


2. 


IB  Go  beyond 
"i30ol(  learning" 
to  get  tiue  hands- 
on  experience 

NKI  knows  you  learn  heller  by 
doing.  So  NKl  training  works 
overtime  to  give  you  that 
invaluable  practical  experience. 
You  first  read  alxiul  the  subject, 

studying  diagrams,  schematics,  and  photos  that  make  the  subject  even 

clearer.  Tlien  you  do.  You  build,  examine,  remove,  test,  rejKiir,  replace. 

You  discover  for  younself  the  feel  of  the  real  thing,  the  confidence  gained 

only  with  experience. 
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Get  inside 
a  powerfui  com- 
puter system 

If  you  really  want  to  gel  ahead 
In  computer  service,  you  have 
to  get  inside  a  states) f-the-iirt 
computer  system,  llial's 
why  NRI  includes  the 
powerful  new  Packard 
Bell  VX88  computer  as 
the  centerpiece  of  your 
hands-on  training. 

As  you  build  this 
fully  IBM  f'C  XT- 
compatible  micro 
from  the  keyboard  up, 
performing  key  tests 
and  demonstrations  at  each  stage  of  assembly,  you  actually  see  for 
yourself  how  every  section  of  your  computer  works. 

You  assemble  and  test  your  computer's  'intelligent"  keyboard, 
install  the  power  supply  and  ^'A'  floppy  disk  drive,  then  interface  the 
high -resolution  monitor.  But  that's  not  all 

You  go  on  to  install  a  powerful  20  megabyte  hard  disk 
drive— today's  most-wanted  computer  |>eriphera!— included  in  your 
training  to  dramaticiJly  increase  the  data  storage  capacity  of  your 


computer  while  giving  you  lightning-quick  data  access 

fiy  getting  inside  this  ixiwerful  computer,  you 
get  tiie  confidence-building,  real-world  experience 
you  need  t<i  work  with,  truubleshoot.  and  service 
today's  most  widely  used  computer  systems. 
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'■  i\^al<e  sure  you've  always  got 
someone  to  turn  to  for  help 

Throughout  your  NRI 
training,  you've  got  the 
full  support  of  yovir 
iX'rsonal  Mf^l  instructor 
and  the  entire  NRI 
technical  staff.  Always 
ready  to  answer  your 
(]Liestions  and  help  you  if 
you  should  hit  a  snag, 
your  instniciors  will 
make  you  feel  jls  if 
you're  in  a  cla.ssroom  of 
one,  giving  you  as  much  time  atid  personal  attenlion  as  you  need. 


5. 


step  into  a  bright  new  future  in 
computer  service—start  by  sending  for 
your  FREE  catalog  today! 

Discover  f<jr  yourself  how  easy  NRI  makes  it  to  sue-  , 
ceed  in  computer  service.  .Si'iid  today  lor  NKI's  big, 
l()()-[)age,  full-color  catalog  describing  every 
aspect  ol  NKI's  one-of-akind  computer  training, 
as  well  as  Iraining  in  robotics,  'I  V/ video /audio 
servicing,  electronic  music  technology,  security 
electronics,  and  other  growing  high-tech 
career  lields. 

If  the  coupon  is  missing,  write  to;  NRI 
School  of  Electronics,  McGraw  Hill  Continuing  ^^■•z 

Education  Center,  4401  Connecticut  Avenue,  NW,  Washington,  DC  20008. 

ll!Mis,iri'H^U-n^Mr,i^h'Mi,iffk(h1]ji1rfH.ilHji]LLllkisiLii'SiiM;nliiiiE?ir(iqv 


School  ot 
Sleclronics 
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McGraw-Hill  Continuing  Education  Center 

-l-IOl  Connecticut  Avenue,  NW,  Washington,  DC  20008 

,«/ CHECK  ONE  CATALOG  OM.Y 

□  Computers  and  Mkroproce«aors 

U  Robotics 

n  TV/VicIe{)/Audio  Servicing 

D  Data  Conjmunicatlons 


For  cartrr  courses 

.i|>[)rnve(i  uiidt-r  Gl  Bill 
^  cht?ck  for  del  alls. 


D  Security  Electronics 
n  Electronic  Music  Tcchnologv- 
n  Disilal  Electronics  ServJcinsf 
D  Computer  Programming 
D  Basic  Electronics 


Name  . 


Address 
City 


State. 


.ap. 
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available  for  the  SFX  Expander.  While  SFX  is  by  far  the  least 
expensive  way  to  enter  the  world  o/  FM  sound,  it  is  neither 
expandable  nor  able  to  import  materials  from  other  sys- 
tems. Future  software  development  for  SFX  is  unlikely. 

Other  MIDI  Hardtvare 

Moving  up  to  a  full-fledged  MIDI  system  can  be  expensive. 
You  will  need  a  MlDI-compatible  keyboard  ($130  and  up), 
a  MIDI  interface  for  the  64/128  ($50-$100),  one  or  two 
MIDI  cables  (five-pin  DIN  cables  sold  by  music  dealers  for 
$6-$8  each),  and  software  ($30  plus — unless  you  go  with 
public  domain).  Two  cables  are  required  only  if  you  intend 
to  record  and  play  back  from  your  keyboard. 

Most  MIDI  keyboards  have  mono  output  (only  a  few 
have  stereo),  and  you  will  likely  need  a  phone-plug-to- 
RCA-plug  cable  to  connect  your  amplifier  to  the  output  jack 
on  your  keyboard.  Unless  you  have  a  MONO/STEREO 
switch  on  your  amp,  you'll  also  require  an  RCA  Y-connector 
(one  jack  to  two  plugs). 

The  Casio  MT-240  is  the  least  expensive  MIDI  key- 
board currently  available,  retailing  for  $t39.95.  It  has  min- 
iature keys  (four  octaves)  and  its  tone  colors  cannot  be 
programmed.  It  produces  a  particularly  good  piano  sound, 
along  with  119  other  sounds;  comes  with  built-in  speakers; 
and  can  play  ten  notes  simultaneously.  It  lacks  a  head- 
phone jack,  keyboard  split,  and  polyrimbral  capability. 

Casio's  CT-640  ($337.73)  has  five  octaves  of  full-sized 
keys  as  well  as  built-in  song  memory  and  a  headphone  jack. 
Possessing  all  the  features  of  the  MT-240,  the  CT-640  in- 
cludes 465  preset  sounds,  but  it  also  lacks  sound  program- 
ma  btlity. 

The  entry-level  Yamaha  (FM)  MIDI  synthesizer  is  the 
PSS680  ($250).  It  incorporates  stereo  speakers,  percussion 
pads,  song  memory,  reverb,  and  a  headphone  jack.  Though 
its  keys  are  small,  it  has  five  octaves.  Best  of  all,  its  two- 
operator  sounds  are  at  least  partially  programmable 
through  a  small  LCD  display. 

The  Casio  PMP300  is  the  least  expensive,  full-sized 
multitimbral  keyboard.  Retailing  for  $269,  it  features  four 
octaves  and  210  sound  mixtures. 

Full-featured  keyboards — such  as  the  Yamaha  DXll, 
with  velocity  and  after-touch  sensitivity,  five  octaves  of 
full-sized  keys,  and  a  split  keyboard  (or  multitimbral  capa- 
bility)—start  at  $840.  Their  features  are  what  tend  to  make 
MIDI  instruments  expensive. 

Various  companies — Yamaha,  Casio,  Roland,  Korg, 
Kavvai,  Oberheim,  Ensoniq — have  different  methods  of  cre- 
ating sound,  and  the  results  are  often  strikingly  different.  If 
you  are  concerned  with  variety  and  want  to  experiment 
with  sound  color,  look  for  the  most  flexible  and  open  sys- 
tem. Ask  for  a  demonstration  of  as  many  varied  sounds  as 
possible.  Wide-ranging  programmability  is  your  ticket  to 
creative  sound  making. 
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MWf  Softwcnv 

Craig  Chamberlain's  Enhmiced  Sidplayer,  MIDI  edition,  is 
available  in  a  special  version  for  Casio  CZ  keyboards — a 
low-cost  but  now-discontinued  series.  (He  is  said  to  be 
working  on  other  manufacturer-dependent  editions  as 
well.)  The  CZ  version  allows  you  to  play  any  mono  SID 
composition  in  multiple  tone  colors  on  CZ  keyboards. 
Chamberlain's  software,  available  on  Q-Link,  includes  doc- 
umentation outlining  how  to  add  commands  to  your  com- 
positions to  access  the  CZ's  special  features. 

Chamberlain's  generic  MIDI  Player  program  opens  up 
a  great  source  (SID)  of  MIDI  music  for  the  beginner.  It's  the 
only  software  you  need  to  get  started-— and  it's  free  through 
Q-Link  and  some  user  groups.  With  Chamberlain's  book/ 
disk  combination,  you  can  create  your  own  music  and  play 
it  back  either  on  SID  or  through  your  MIDI  setup. 

Two  other  commercial  music  programs  offer  an  option 
of  either  SID  or  MIDI  playback;  Instant  Music  (Electronic 
Arts,  $29.95)  and  Advanced  Music  Si/stem  (Fi  re  bird/ Acti  vi- 
sion, $59.95).  Both  packages  let  you  play  music  through 
MIDI,  using  different  interfaces,  and  with  your  choice  of  pre- 
set voice  numbers,  instant  Music  comes  already  orchestrated 
for  the  Casio  CZlOl  and  includes  a  large  music  library  of 
rock-'n'-roll.  It  will  even  sync  with  a  drum  machine. 

If  you  want  to  enter  music  into  the  computer  via  a 
MIDI  keyboard  in  realtime,  you  need  a  bona  fide  sequencer 
program.  At  $70.00— $150.00,  these  multifeatured  pro- 
grams are  customized  for  either  the  64  or  128  and  are  de- 
signed to  work  with  particular  brands  of  interfaces.  Before 
making  a  purchase,  be  sure  to  check  the  required  interface. 
Offering  significant  sequencer  and  editor/librarian  soft- 
ware are  Dr,  T,  Sonus,  and  Passport,  Also  selling  MIDI  in- 
terfaces for  the  64/128  are  Datel  and  Sequential.  Some 
interfaces  are  compatible  with  each  other;  others  are  not. 
Dr.  T  is  compatible  with  Sequential;  Sonus,  with  Passport. 
Datel  isn't  compatible  with  any  others  but  is  the  least  ex- 
pensive ($49,95), 

If  your  MIDI  keyboard  is  programmable  and  you  wish 
to  create  and  save  your  own  sounds,  you'll  need  a  librarian 
or  a  patch  editor/librarian  ($100  and  up).  Librarians  are 
generic  and  work  with  a  variety  of  synthesizers,  but  they 
don't  allow  you  to  edit  or  create  sounds  on  the  computer. 
Editor/librarians  are  keyboard-  (or  manufacturer-)  specific 
and  do  allow  you  to  create  and  rearrange  sounds  on  a  64  or 
128.  Your  best  bet  probably  is  to  purchase  an  editor/librar- 
ian for  the  MIDI  keyboard  you  own.  If  you  want  to  con- 
struct your  own  sounds,  make  sure  that  the  programmable 
synthesizer  you  buy  has  editor/librarian  software  available 
for  it. 

MIDI  keyboards  are  widely  available  even  in  discount 
houses.  Major  music  stores  often  have  large  MIDI  depart- 
ments with  staff  members  who  are  knowledgeable  and 
happy  to  show  off  their  latest  electronic  instruments  and 
processing  devices. 

There's  a  lot  more  music  in  your  64  or  128  than  might 
casually  meet  your  ear.  Here's  a  chance  to  let  your  musical 
creativity  loose  and  let  your  spirit  soar.  Good-bye,  tinny 
speaker.  Hello,  hi-fi  and  stereo;  good  morning,  FM  and 
MIDI,  Here's  to  many  hours  of  good  listening  and  happy 
arranging.  G 


Online: 

Island  of  Fantasy 


Dragons  and  ogres  have  long 
been  a  staple  of  fantasy  games, 
but  now  several  major  online 
services  have  added  some 
innovative  twists.  Here's  an  in- 
depth  look  at  one  world  where 
the  next  character  you  meet  in 
a  dark  dungeon  may  be 
another  human. 


1  stand  fresh  off  the  dock  on  the  Is- 
land of  Kesmai,  I  look  around,  but  no 
one  seems  to  notice  my  presence.  A 
quick  check  of  my  possessions 
(SHOW  SACK,  SHOW  BEI.T)  reveals 
one  gold  piece,  some  leather  armor,  a 
sword,  and  a  shortbow.  Not  much,  to 
be  sure,  but  enough  for  a  novice 
fighter  like  me. 


Cheryl  Peterson 

I  am  about  to  enter  the  fascinat-  I 
ing  world  of  the  Island  of  Kesmai,  a  J 
multiplayer  interactive  game  on 
CompuServe.  Not  only  will  1  encoun-  i 
ter  dragons,  trolls,  and  other  creatures  ■, 
that  inhabit  fantasy  games,  but  I'll 
also  meet,  talk  to,  and  interact  with  as  ' 
many  as  100  other  players  who  play  ' 
this  game  simultaneously  via  modem  ; 
and  personal  computer. 

But  first,  I  make  my  way  through 
town,  hoping  to  find  the  entrance  to 
the  dungeon  where  most  of  the  action 
takes  place.  A  vendor  hawks  a  book 
purported  to  tell  the  way  into  the 
dungeon.  Fortunately,  before  I  ar- 
rived, I  learned  that  the  dungeon  en- 
trance is  inside  the  temple  that  is 
north  of  my  current  location,  i  save 
my  lonely  gold  piece  for  something 
more  useful,  though  nothing  in  town 
comes  very  cheaply. 


As  1  head  for  the  temple  (N  N 
N — NORTH  three  times,  or  approxi- 
mately 30  feet),  1  note  the  weapon 
and  armor  shops.  With  a  little  luck, 
I'll  be  able  to  afford  better  equipment 
once  I  fight  some  of  the  dungeon 
denizens. 

1  spot  the  temple  doors  and  head 
for  them.  A  town  beggar  accosts  me, 
asking  for  a  coin  to  buy  a  drink.  "Sor- 
ry, friend,"  I  say,  "but  I  have  no  gold 
to  spare." 

1  desperately  wish  I  could  afford 
to  buy  a  few  bottles  of  balm  sold  by 
the  vendor  here  in  the  nave,  but  at  16 
gold  pieces  each,  they  are  far  above 
my  limited  budget.  Another  player 
walks  in  from  the  square.  "Hello, 
Cherp!"  she  says,  looking  at  me.  Tak- 
ing a  close  look  at  her,  1  recogni/:o 
Lynn,  a  middle-aged  female  fighter 
from  my  home  country  of  Mnar.  c> 
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"Howdy  to  you.  Are  you  headed 
down  into  the  dungeon?  I've  just  ar- 
rived and  this  is  my  first  trip  down,"  [ 
tell  her. 

"Ah,  I  see.  Yes,  I  was  headed 
down,  hut  I  don't  think  it  safe  for  you 
to  hunt  where  I'll  be  going.  Do  you 
have  any  halm  yet?"  she  asks  as  she 
stands  next  to  the  halm  vendor. 

"No,  I  haven't  the  gold  to  afford 
it,"  (  say  hesitantly. 

"No  problem;  1  have  a  few  extra 
gold  pieces.  Come  and  get  them." 

"Thank  you  very  much,"  1  say. 
Lynn  drops  some  gold  on  the  ground, 
and  we  wait  as  the  vendor  takes  the 
gold  and  drops  the  balm  bottles  for 
us,  I  pick  up  the  bottles  and  add  them 
to  my  meager  possessions. 

"I  can't  thank  you  enough  for 
this,"  I  say.  "Is  there  some  way  I  can 
repay  you?  Perhaps  we  could  meet 
here  again  later  and  I  could  give  you 
some  balms  in  return." 

"No,"  she  laughs,  "I  have  no 
need  of  them.  Just  remember  there  arc 
always  other  players  who  are  just 
starting  out.  They  may  find  them- 
selves in  the  same  position  you  are  in 
now.  Try  to  lend  them  a  hand  when 
you  are  sufficiently  strong. 

"By  the  way — one  other  tip," 
Lynn  says.  "As  soon  as  you  can  af- 
ford one,  buy  yourself  a  recall  ring. 
There's  a  ring  seller  in  the  market- 
place by  the  pawnshop.  Choose  a  safe 
spot  here  in  town  and  put  on  the  re- 
call ring.  Then  when  you  get  into  real 
trouble  in  the  dungeon,  remove  the 
ring.  You  will  be  transported  instantly 
back  to  the  spot  where  you  first  put  it 
on.  The  ring  is  useless  once  removed, 
so  you  will  need  to  buy  another  if 
you  use  the  first.  But  it's  the  best  pro- 
tection against  sudden  death  if  you 
take  too  much  damage. 

"Some  of  us  carry  a  spare  in  our 
sack  and  put  it  on  in  the  dungeon. 
This  helps  us  get  back  quickly.  Take 
care."  So  saying,  she  disappears  in  a 
flash  accompanied  by  a  thunderclap. 

With  my  few  balms  safely  stowed 
in  my  sack,  I  head  down  into  the 
dungeon.  No  sooner  do  1  ahght  on 
the  bottom  step  than  two  ugly  ores 
approach  from  the  south.  Before  I 
have  time  to  think,  they  are  on  me 
(FIGHT  ORC).  1  swing  my  sword  and 
hope  to  end  the  fight  quickly,  but  it  is 
not  to  be. 

My  swing  is  wide  and  the  ores 
take  jabs  at  me.  Both  score  hits  and  I 
feel  myself  weakened  by  their  blows. 
Again  I  swing,  this  time  nicking  one 
of  them  (AGAIN).  Yet  again  I  swing, 
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Kesmai  is  much 
more  than  a 
conventional 

computer  game 
because  it  offers 
true  multiplayer 
interaction. 


and  one  ore  falls  beneath  my  blow 
(AGAIN).  The  remaining  ore  takes  a     ;! 
swing  at  my  head  but  misses.  1  dive 
beneath  the  blow  and  strike  for  its 
heart.  Its  armor  blocks  my  blow,  but  I  . 
thrust  again  and  it  dies. 

I  laugh  joyously.  My  first  kill,  but 
I  am  badly  wounded.  Taking  a  balm 
from  my  sack,  1  open  and  drink  it 
(TAKE  BALM  FROM  SACK  AND 
OPEN  IT,  DRINK  BALM  AND  DROP 
IT).  Good  health  courses  through  my 
veins,  and,  instantly,  all  the  damage 
inflicted  by  my  opponents  is  healed. 
This  balm  is  wondrous  stuff. 

Searching  the  corpses  (SEARCH 
CORPSE.  SEARCH  2  CORPSE),  1  find 
two  gems  and  a  few  gold  coins  to  re- 
ward me  for  my  trouble  (TAKE  GEM 
AND  PUT  IT  IN  SACK.  AGAIN, 
TAKE  COINS  AND  PUT  THEM  IN 
SACK).  One  ore  is  wearing  chain  mail 
and  i  quickly  remove  my  leather  ar- 
mor and  replace  it  with  its  slightly 
dented  armor  (REMOVE  LEATHER 
AND  DROP  IT.  TAKE  CHAIN  AND 
WEAR  IT),  1  continue  my  exploration. 

Fantasy  Games  Meet  the 
Online  Cotnmunity 
This  scenario  may  sound  a  bit  far- 
fetched, but  similar  stories  take  place 
each  day  on  the  Island  of  Kesmai.  1 
spent  several  hours  playing  the  game 
every  day  for  two  months.  Some 
days,  I  spent  12  hours  online.  What  1 
found  was  a  wonderful  alternate  uni- 
verse that's  so  engaging  I  almost 
didn't  want  to  leave  at  the  end  of  the    ( 
day. 

But  Kesmai  is  much  more  than  a 
conventional  computer  game  because 
it  offers  an  element  that  no  home 
computer  game  can:  Multiplayer  inter- 
action. Players  standing  in  the  same 
area  of  the  game  can  talk  to  one  an-     ■'. 
other.  It  is  also  possible  for  several 


players  to  plan  group  attacks  against 
tougher  monsters.  In  fact,  solohig  a 
dragon  or  drake  is  not  the  recom- 
mended way  to  go  about  beating 
these  critters.  After  all,  monsters  gath- 
er in  packs  to  fight,  so  why  not  hu- 
man players? 

But  I'm  getting  ahead  of  myself. 
How  does  one  step  into  this  world? 

First,  open  an  account  with 
CompuServe.  Before  starting  to  play, 
yoLi  must  create  an  alternate  persona. 
The  character  may  be  male  or  female. 
You  are  given  a  choice  of  countries 
that  your  character  may  be  from.  A 
character  generator  will  then  show 
you  statistics  that  it  proposes  for  your 
character.  These  stats  will  determine 
some  of  your  character's  capabilities. 
If  you're  not  happy  with  the  ones  dis- 
played, tell  the  generator  to  reroll.  It 
will  keep  doing  so  until  you're  satis- 
fied with  the  character's  stats. 

When  the  statistics  suit  you, 
choose  your  profession  and  give  your 
character  a  name.  You  may  choose  to 
he  a  fighter,  a  martial  artist,  a  thau- 
maturge (magician),  a  wizard,  or  a 
thief,  (Future  plans  for  the  game 
allow  for  a  new  class  of  characters 
called  sorcerers.) 

Each  of  these  professions  has 
benefits  and  drawbacks.  I  highly  rec- 
ommend getfing  a  copy  of  the  Island 
of  Kesmai  player's  guide  from 
CompuServe.  It's  invaluable  and  will 
save  you  considerable  online  time,  A 
wealth  of  help  files  and  information 
are  offered  in  the  MPGAMES  forum 
on  CompuServe.  Libraries  there  con- 
tain maps,  hints,  and  even  a  player- 
written  guide  called  Uncle  Balrog's 
Beginner's  Manual. 

The  fighters  and  martial  artists 
use  brute  force  to  win  the  day,  while 
thaums  and  wizards  tend  to  use  mag- 
ic to  advance  their  causes.  Thieves 
survive  by  hiding  and  stealing  when- 
ever possible,  and  by  fighting  if  they 
get  caught.  When  fighters  advance  far 
enough,  they  may  make  a  pilgrimage 
to  see  Hermann  the  Hermit  and  be- 
come knighted.  Knights  have  a  mini- 
mum of  magic  power,  but  they  can 
recognize  thieves  almost  instantly. 
Knights  can  also  "see  through"  a 
thief's  hide  spell  if  the  thief  is  not 
more  advanced  than  the  knight. 

Building'  Character 

Once  you've  created  a  character,  you 
have  a  lot  of  challenges  ahead  of  you. 
Whatever  your  profession,  you  will 
almost  certainly  start  your  play  with  a 
trip  to  the  dungeon,  the  first  level  of 


which  is  designed  to  interest  the  be- 
ginning player.  As  you  progress 
through  the  dungeon's  levels,  the 
monsters  you  meet  become  tougher. 
At  the  fourth  level,  the  opponents  are 
very  difficult;  few  people  of  little 
experience  visit  those  depths. 

New  players  must  acquire 
enough  gold  to  promote  their  charac- 
ters to  higher  levels.  Usually  this  re- 
quires vanquishing  numerous 
opponents.  Thieves  try  to  steal  from 
those  in  the  dungeon  and  then  sell 
whatever  they  get.  Another  method  is 
to  run  through  the  dungeon,  picking 
up  useful  items  like  weapons  and  ar- 
mor to  take  out  and  sell  to  the  shops. 
Of  course,  to  do  that,  it's  wise  to 
know  which  items  have  the  highest 
resale  value,  since  you  can  carry  a 
limited  amount  of  booty. 

The  beginning  levels  of  the  dun- 
geon are  enough  to  keep  new  players 
busy,  but  as  your  character  gains 
experience  you'll  want  to  take  on 
some  of  the  game's  more  challenging 
aspects.  Level  4  of  the  dungeon  con- 
tains a  dragon's  lair.  The  dragon  is  a 
formidable  opponent  that  does  indeed 
breathe  fire.  The  water  channels  in  its 
lair  provide  some  protection  from  the 
flames,  but  should  you  take  a  stun- 
ning blow  while  in  the  water,  you'll 
drown  unless  you're  wearing  a  water- 
breathing  ring.  These  rings  are  found 
as  treasure  on  some  of  the  other  crit- 
ters in  the  dungeon. 

If  the  dragon  should  manage  to 
kill  you,  it  almost  certainly  will  eat 
you.  (Hey,  dragons  have  to  eat,  too.) 
If  you're  killed  by  the  flames  of  its 
breath,  the  Ghods  will  resurrect  you 
in  the  temple.  If  it  gets  you  with  tooth 
or  a  claw,  you  become  Kesmian  Drag- 
on Chow  and  must  reroU  your  charac- 
ter from  scratch.  Everything  you  own 
ends  up  on  the  floor  of  the  dragon's 
lair.  The  only  thing  you  have  left  is 
any  money  you  may  have  in  the  Kes- 
mai  bank. 

Run  Away  or  Quit 

Of  course,  if  players  are  unable  to  co- 
operate, they  are  also  able  to  fight 
each  other,  Kesmai  frowns  on  battles 
between  players,  and  it  has  a  karma 
system  that  helps  to  deal  with  the 
problem.  If  you're  a  new  player, 
though,  you  should  be  aware  that 
there  are  people  in  the  game  who  do 
nothing  but  prey  on  other  players. 
There  is  not  much  to  be  done  about 
these  people.  Kesmai  has  plans  to 
take  care  of  them  on  a  permanent  ba- 
sis, but  in  the  meantime,  the  best 


Want  to  really  get 
away  from  it  all? 
Try  spending  your 
next  vacation  on 
the  Island  inside 
your  computer. 


thing  to  do  if  attacked  by  another 
player  is  to  either  run  away  or  quit 
the  game  momentarily. 

Try  to  get  the  user  number  of  the 
person  who  attacked  you  and  report  it 
to  the  folks  who  run  the  MPGAMES 
forum.  If  you  do  get  killed,  you  might 
report  it  in  the  forum  and  see  if  any- 
one is  willing  to  help  you  rebuild 
your  character.  Kesmai  may  even  of- 
fer you  some  assistance.  Killing  other 


players  is  not  the  accepted  mode  of 
J  play. 


o  A  Step  Beyond 

,^  Island  of  Kesmai  is  more  than  just  a 
'  computer  game.  The  interaction  with 
other  players  and  the  cooperation  in 
■  accomplishing  goals  make  it  a  step 
above  the  ordinary.  The  challenges  of 
Kesmai  are  very  engrossing — even 
when  you've  developed  a  high-level 
character,  there's  still  room  to  grow. 
New  challenges  are  always  being 
added  by  the  Kesmai  staff.  Two  now 
advanced  game  segments  are  being 
tested  and  a  new  basic  game  segment 
is  also  being  written. 

If  you  really  want  to  get  away 
from  it  all,  try  spending  your  next  va- 
cation on  the  Island  in  your  computer. 
All  it  takes  to  play  is  a  modem,  a 
CompuServe  account,  and  a  little 
.  money.  Be  sure  to  open  your  account 
at  least  two  weeks  before  your  vaca- 
tion is  scheduled.  Good  hunting,  and 
if  you  see  CHICKENCHERP, 
DREAM. GEISHA,  or  SHADOW- 
. DANCER,  say  "Hi!"  It  might  be 
someone  you  know,  G 


In  addition  to  island  of  Kesmai,  you 
might  want  \o  chock  out  some  of  these 
other  multipLiycr  games  found  on  the 
major  online  services. 


British  Legends.  Attaining  wizard  or 
witch  status  in  this  game  allows  you  to 
control  what  confronts  other  players. 
Points  arc  won  I'y  finding  and 
"swamping"  valuable  olvjeets.  Players 
can  cooperate  or  fight  each  other.  Steal- 
ing treasure  is  not  unheard  of. 

MegaWars  I— The  Galactic  Conflict 
(1-10  players).  Use  your  spaceship  to 
destroy  enemy  bases  and  ships,  capture 
neutral  and  enemy  planets,  and  build 
defenses.  •iiniiiiiliiinl' 


MegaWars  HI— The  New  Empire 

(1-100  players).  Two  games  in  one:  The 
first  phase  is  similar  to  MegaWars  I,  but 
you  can  design  your  own  ship;  the  sec- 
ond phase  requires  planetary  manage- 
ment to  build  an  empire.  There  is  team 
play  using  the  hyperspace  radio.  This  is 
a  fcur-  to  six-week  game,  with  the  win- 
ning team  captain  becoming  Emperor 
of  the  Galaxy, 

SeaWar  (4  players).  This  game  is  simi- 
lar to  the  board  game  Battleship  ai\d,„.,, 
offers  weekend  tournaments,  :ljl(jlliljjjl}ljjli 

SpaceWar  (S  players).  !-"astcr- paced  and 
more  compel  itive  than  MegaWars, 
SpaceWar  offers  intership  communica- 


You  Guessed  Itl  The  online  commurvity 
meets  "Family  Feud,"  Players  compete 


f.^ne-on-oive  or  as  team  members.  This 


III 

////game  offers  real  prizes, 


GEn 


Gemslone.  A  fantasy  role-playing  ad- 
venture game  on  a  smaller  stale  than 
Island  of  Kesmai,  Gemstone  is  similar 


Stellar  Warnor.  Blast  enemy  vessels 
and  capture  alien  planets  in  this  tactical 
space  adventure.  Stellar  Warrior  is  simi- 
lar to  MegaWars  and  is  operated  by  its 
creators. 

StelUr  Emperor,  Thii 
all  the  tactical  features  of  Stellar  War- 
rior but  offers  more  strategic  planning, 

QuantiitnLink 

Rabbit  Jack's  Casino.  This  online  of-  ■'Ij 
fering  features  casino  games,  rwe-card-fjjj 
stud  poker,  hbckjack,  slot  nvicbines,     lllj 
bingo,  and  five  players  per  table  in  card 
games.  The  bingo  payoff  depends  on 
the  number  of  players;  the  slot-machine 
grand  prize  builds  on  the  number  of 
players  and  continues  to  build  until 
someone  wins  it.  It  can  go  as  high  as 
9999  Q-chips.  This  is  the  most  inexpen- 
sive online  game  available. 
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Sffectrum  128 

Simply  put,  the  Commodore  128  has 
never  lived  up  to  its  advance  billing. 
When  it  first  appeared,  the  machine 
seemed  destined  to  replace  the  64:  It 
had  more  memory,  higher  resolution, 
faster  disk  access,  80-column  stand- 
ard— the  works.  In  other  words,  the 
128  was  to  the  64  what  the  Apple  I!c 
was  to  the  Apple  II. 

Trouble  was,  tTot  enough  people 
bought  it.  Another  problem  was  the 
128's  complete  compatibility  ivith  the 
64.  Now,  this  would  seem  to  be  a  good 
thing,  but  in  fact  it  worked,  in  part  at 
least,  against  the  128's  acceptance.  Be- 
cause the  computer  was  64-compatible, 
it  ran  64  programs;  because  it  ran  64 
programs,  nobody  bothered  to  make 
128-specific  programs.  Why  port  a  pro- 
gram to  a  new  machine,  the  prevailing 
wisdom  went,  when  the  new  machine 
will  run  the  existing  program? 


Then,  because  there  weren't  many 
128-specific  programs  available,  people 
didn't  bother  buying  the  machine — at 
least  not  in  numbers  comparable  to  the 
64's.  And  so  it  goes. 

There  is,  however,  a  healthy  batch 
of  128s  out  there,  and  there  are  some 
companies  that  offer  128-specific  soft- 
ware. Berkeley  Softworks  is  a  big  sup- 
plier, of  course,  with  its  GEOS  128  line; 
Batteries  Included  and  Time  works  have 
also  supported  the  128. 

Now  comes  a  line  of  128-specific 
packages  from  Free  Spirit  Software,  and 
whatever  their  merits,  they're  extreme- 
ly nice  to  have. 

Their  merits,  fortunately,  are  quite 
strong. 

Spectrum  12fi  is  a  128-specific  paint 
program.  In  fact,  it's  not  just  128-specific; 
its  specificity  runs  deeper.  To  use  Spec- 
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trum  1 28,  you  need  a  1 28D  or  a  1 28  with 
the  64K  video  RAM  upgrade  (available 
from  your  dealer).  In  addition,  you  need 
a  Commodore  1351  (or  compatible) 
mouse  and  an  RGB  80-column  monitor. 
Impressively  from  an  artist's  stand- 
point. Free  Spirit  has  chosen  quality  of 
performance  over  guarantee  of  sales, 
but  one  wonders  how  much  the  deci- 
sion has  cost  the  company.  Still,  128 
aficionados  will  surely  be  happy  that 
they  are  finally  properly  served. 


Free  Spirit  has  chosen 
quality  of  performance 
over  guarantee  of  sales. 


The  program  itself  is  good.  It  auto- 
boots  in  128  mode,  then  asks  if  you  are 
using  a  1 750  REU  and  if  your  monitor  is 
capable  of  Interlace  Sync  mode  (the 
Commodore  1084  isn't,  by  the  way). 
This  latter  option  is  impressive — again, 
because  it  recognizes  the  special  needs 
of  serious  128  users.  Finally,  the  menu 
bar  appears. 

Spectrum's  interface  is  straightfor- 
ward. Clicking  the  right  mouse  button 
on  Menu  yields  a  pull-down  list  of  sev- 
eral options.  Options  are  also  click- 
seleetable. 

Once  you're  in  drawing  mode, 
where  you're  actually  working  on  the 
screen,  the  right  mouse  button  controls 
what  you  draw.  The  left  button  brings 
up  the  color  palette,  and  clicking  on  it  a 
second  time  returns  you  to  the  menu 
bar,  While  you're  drawing,  the  menu 
bar  disappears. 

The  items  in  the  menu  bar  are 
Paint,  Shapes,  Solids,  Tools,  and  Ex- 
tras. Each  holds  a  host  of  options. 

The  Paint  item,  for  example,  offers 
Paint,  Air  Brush,  Mirror,  Multi-Color, 
Block  Fill,  Block  Erase,  Erasers,  and 
Clear  Screen. 

Clicking  on  Shapes  brings  up  Dots, 
Line,  Lines,  Rays,  Box,  Circle,  Poly- 
gons, and  Preferences.  Polygons  and 
Preferences  both  contain  submenus  as 
well:  Polygons,  for  instance,  allows 
Round,  Dodecagon,  Octagon,  Hexa- 
gon, Diamond,  and  Triangle.  You  click 


on  one  of  them  and  then  create  the 
shape  you  want  on  the  screen. 

Possible  solids  are  Sphere,  Donut, 
Cylinder,  and  Spool.  When  creating  a 
solid,  you  can  select  its  screen  appear- 
ance with  the  Preferences  options: 
View,  Shade,  and  Light.  View  lets  you 
draw  the  solid  on  either  the  horizontal 
or  the  vertical  axis  and  lets  you  look  at 
the  donut  shape  from  a  top  view.  With 
Shade,  you  choose  between  Textured 
and  Halftone — the  former  using  a  ran- 
dom dot  pattern;  the  latter,  a  fuller- 
looking  object.  The  Light  option  offers 
normal  lighting  or  backlighting.  With 
backlighting,  the  object  shows  light 
coming  from  behind. 

From  the  Tools  menu,  you  can  cut 
and  paste  sections  of  your  painting,  fill 
in  areas  with  one  of  many  fill  patterns 
available  on  Spectrum's  data  disk,  put 
text  into  the  painting  (using,  again,  one 
of  many  supplied  fonts),  or  edit  colors 
or  pixels. 


Editing  pixels  is  Spectrum's  version 
of  area  magnification,  in  which  you  se- 
lect a  small  region  and  work  within  it. 
In  Spcctnim,  you  edit  the  pixels  one 
color  at  a  time,  which  means  that  multi- 
colored detail  must  be  done  in  several 
stages.  Editing  colors  is  the  way  to 
change  the  colors  of  a  specific  object. 

Free  Spirit  explains,  at  the  begin- 
ning of  the  brief  (ten-page)  manual, 
how  Spectrum  128  works.  Most  64  paint 
programs  use  a  160  X  200  pixel  resolu- 
tion, with  an  8  X  8  pixel  color  cell.  Four 
colors  can  be  displayed  within  each 
color  cell,  and  a  total  of  16  can  appear 
on  the  screen  at  any  one  time. 

Other  programs,  such  as  geoPaint, 
use  320  X  200  high  resolution,  still  with 
the  8  X  8  pixel  color  cell.  Spectrum  128, 
on  the  other  hand,  uses  the  I23's  video 


display  chip  to  attain  a  resolution  of  640 
X  200  pixels  and  (just  as  important)  a 
reduced  color  cell  of  8  X  2  pixels. 

This  means,  of  course,  much  greater 
control  over  the  appearance  of  the 
screen,  because  the  color  cells  take  up 
proportionally  (and  actually)  much  less 
roDin.  More  color  cells  spread  over  more 
pixels  means  much  more  possible  detail. 

Working  with  these  color  cells  is  the 
heart  of  the  Spectrum  118  package.  The 
manual  makes  a  big  deal  of  suggesting 
that  the  Block  Erase  function  is  extreme- 
ly important  in  this  program,  but  not  un- 
til you  use  it  do  you  realize  why. 

Choosing  Block  Erase  (from  the 
Paint  menu)  brings  up  the  color  menu. 
You  select  a  color  and  then  proceed  to 
draw  a  rectangle  of  any  size  on  the 
screen.  Click,  and  you  have  a  rectangle 
of  that  color  to  work  with.  The  impor- 
tance of  this  new  rectangle  is  that  it  is 
essentially  a  new  background  that  you 
can  paint  on.  Spectrum  uses  the  8  X  2 
color  cell  as  the  basis  for  this  function. 

What  Block  Erase  does,  then,  is  let 
you  partition  the  screen  into  a  variety  of 
background  colors.  You  can  then  paint 
on  top  of  these  areas  as  you  would  nor- 
mally paint  on  any  background.  You 
can  paint  directly  on  it  or  use  Edit  Pixels 
to  isolate  and  magnify  a  portion  of  it. 

The  disadvantage  of  using  Block 
Erase  is  that  you  can't  move  these  rec- 
tangles around,  but  the  advantage  is 
that  they're  much  easier  to  work  with 
than  trying  to  manipulate  the  rectan- 
gles you  draw  with  the  Shapes  menu. 
By  thinking  of  your  paintings  as  a  series 
of  backgrounds  rather  than  as  shapes 
superimposed  on  just  one  background, 
you  will  get  the  picture  right  much 
more  quickly. 

The  8X2  color  cells  are  also  vital 
to  Spectrum's  MuIti-Color  option. 
Usually,  you  will  paint  from  a  palette  of 
16  colors,  but  Multi -Color  gives  you 
128  colors  (they're  actually  dithered 
versions  of  the  16).  You  use  these  colors 
as  a  kind  of  low-resolution  means  of 
painting  in  gobs,  and  they  can  be  incor- 
porated into  any  Spectrum  picture. 

To  display  your  pictures.  Spectrum 
128  includes  a  slide  show.  Just  insert 
your  data  disk  (with  all  your  paintings 
on  it)  and  select  Slide  Show  from  the 
tools  menu,  and  Spectrum  will  load  and 
display  all  your  artwork  in  succession. 
In  fact,  to  get  an  idea  of  the  kind  of  art 
possible  with  this  package,  simply  ask 
for  the  slide  show  of  the  program  disk. 
Several  good-looking  screens  have 
been  included. 

Spectrum  123  allows  you  to  create 
some  impressively  detailed  paintings. 
While  not  offering  as  much  control  over 
technique  as  you  get  from  programs  for 
machines  such  as  the  Amiga  or  the  Atari 
ST,  it  is  nevertheless  a  fine  128-based 
package.  If  Free  Spirit  does  what  it 
should,  adding  options  and  releasing  art 


disks.  Spectrum  128  could  become  some- 
thing of  a  standard  for  serious  128  users. 
It's  good  to  see  the  128  being  put  to 
work. 

— Neil  Randall 

Spectrum  128 
Free  Spirit  Software 
58  Noble  St. 
Kutzlown,  PA  19530 
$39,95 


JackliicMaus* 
Greatest  18  Holes 
of  Ma/or 
Championship  Ixoif 

1  had  high  expectations.  Being  a  long- 
time golfer  and  a  big  fan  of  golf  soft- 
ware, 1  anxiously  awaited  Accolade's 
latest  addition  to  its  line  of  great  sports 
software.  Once  1  read  the  preas  release, 
1  was  convinced  that  jack  Nicklaus' 
Greatest  18  Holes  of  Major  Championship 
Golf  would  be  the  best  golf  simulation 
ever  for  the  64.  Is  it?  Yes  and  no. 

Computer  golf  has  been  received 
far  better  than  anyone  ever  expected, 
with  a  list  of  titles  that  seems  to  grow  by 
the  month.  But  only  a  few  can  rightfully 
vie  for  the  title  of  Best.  Because  of  the 
challenge  in  programming  golf  simula- 
tions, a  majority  of  the  titles  available 
are  little  more  than  grotesque  render- 
ings of  the  game,  jack  Nicklaus  meets 
the  challenge  and  attempts  to  secure  a 
position  at  the  top  by  offering  some  ex- 
citing new  features. 


J$  this  the  best- 

ever  golf 

simulation  for 

the  64? 

Yes,  but. 

Included  in  the  package  are  a  play- 
er's guide,  a  course  sheet,  and  the 
double-sided  game  disk.  The  player's 
guide  is  thorough  and  well  written,  and 
it  offers  several  special  tips  from  Jack 
for  improving  your  computer  golf 
game.  Once  you've  booted  the  game 
and  selected  a  course  to  play,  you're  in- 
troduced to  the  copy-protection 
scheme.  It's  one  of  the  newest  forms  of 
protection,  sometimes  referred  to  as  soft 
protection,  where  the  player  must  type 
in  a  word  or  sentence  that  appears  on  a 
specific  page  in  the  manual.  Accolade 
has  added  a  twist  that  requires  the  play- 
er to  match  the  number  of  the  hole  that 
appears  on  the  screen  to  the  corre- 
sponding number  on  the  course  sheet. 


To  deter  people  from  copying  the 
course  sheet  and  "loaning"  it  to  friends, 
the  sheet  is  printed  on  dark  maroon  pa- 
per with  black  ink.  Just  finding  the 
match  could  be  considered  a  game  in  it- 
self— very  irritating  to  your  eyes  (but 
not  to  the  disk  drive).  If  you  decide  to 
quit  a  game  in  progress,  you're  returned 
to  this  initial  screen  and  subjected  to 
the  same  grueling  process. 

Once  into  the  game,  you  see  the 
wide  variety  of  options  and  unique  fea- 
tures in  jack  Nicklaus.  Players  can  chal- 
lenge the  Golden  Bear  himself  or 
compete  against  male  or  female  golfers 
in  traditional  stroke  format  or  the  recent- 
ly commercialized  skins  format.  Three 
championship  golf  courses  are  included; 
Castle  Pines,  Colorado,  and  Desert 
Mountain,  Arizona,  are  both  courses  de- 
signed by  Jack  Nicklaus,  and  the  third 
one  is  comprised  of  Jack's  selection  of 
the  1 8  greatest  holes  from  the  four  major 
championships:  the  U.S.  Open,  the  PGA 
Championship,  the  Masters,  and  the 
British  Open.  The  only  feature  obvious- 
ly lacking  is  a  course  architect. 


Among  the  impressive  list  of  op- 
tions, the  most  intriguing  to  me  is  the 
opportunity  to  play  against  computer- 
ized players.  Until  jack  Nicklaus,  no  golf 
game  had  featured  a  computer  golfer. 
Now  you'll  never  have  to  worry  about 
filling  out  a  foursome.  Eight  golfers 
(four  men  and  four  women)  are  always 
there  if  you  need  a  partner.  Each  of  the 
golfers  has  different  skills,  which  are 
outlined  in  the  player's  guide.  For  in- 
stance, Natasha  is  known  as  "a  big  hitter 
who  drives  from  the  men's  tees"  and 
Eddie  C.  has  a  reputation  for  "suckering 
players  into  a  'friendly'  game  of  skins." 

The  most  prominent  golfer  in  the 
group  is  Jack  himself,  whose  skills  are 
patterned  after  Nicklaus's  actual  game. 
He  is  always  a  challenging  opponent, 
but  sometimes  a  little  too  good;  even 
the  legendary,  real-life  Jack  couldn't 
beat  computer-clone  Jack  on  the  put- 
ting green.  Don't  be  surprised  if  he  one- 
putts  every  hole. 

The  addition  of  a  computer- players 
feature  is  questionable  compensation 
for  the  lack  of  a  course  editor — in  my 
opinion,  a  poor  tradeoff.  The  computer- 
players  option  is  a  pioneer  idea  but  ex- 
cruciatingly slow  (approximately  45 
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minutes  per  round  for  each  computer 
golfer).  Without  the  ability  to  save  a 
game  in  progress,  the  feature  becomes 
practically  useless. 

Several  features  in  jach  Nicklaus 
enhance  the  realism  of  the  simulation: 
rolling  hills,  downhill  lies,  and  random 
pin  placements.  Since  the  flagstick  is 
placed  randomly,  no  hole  plays  the 
same  way  twice.  Statistics  are  conve- 
niently tallied  for  you  after  every  hole. 
You're  given  yardage  for  your  longest 
drive  and  for  your  last  drive,  plus  stats 
for  closest  hall  to  the  pin,  fairways  and 
greens  in  regulation,  putts  taken,  and 
birdies  and  eagles  made.  By  studying 
these  figures,  you  can  determine  your 
weaknesses  and  become  a  better  player. 

Before  play  begins,  you're  given  an 
overhead  layout  of  the  hole,  complete 
with  distance  and  par.  Pressing  the  fire 
button  brings  up  the  game  screen, 
where  you  view  the  course  from  behind 
the  golfer.  To  select  the  direction  of  a 
shot,  you  move  the  ball  located  at  the 
top  of  the  screen.  The  flagstick  is  also 
displayed  at  the  top  to  help  you  take 
better  aim. 

Located  on  the  left  side  of  the 
screen  is  a  power  bar  that  gauges  each 
swing.  Press  the  fire  button  to  start  your 
bnckswing,  and  the  power  bar  heads 
upward.  Press  again  to  start  your 
doivnswing,  and  the  po'iver  bar  follows. 
The  length  of  your  backswing  deter- 
mines the  distance  the  ball  travels. 

One  last  press  controls  when  you 
hit  the  ball.  Striking  it  early  results  in  a 
hook  (the  ball  goes  to  the  left);  hitting  it 
late  will  slice  the  ball  (cause  it  to  go  to 
the  right). 

Once  you've  become  familiar  with 
the  controls,  you'll  find  that,  in  general, 
the  game  is  much  too  easy.  Wind  has 
only  a  minimal  effect  on  the  ball,  and 
the  rough  and  sand  traps  aren't  the  haz- 
ards the  old  golf  masters  intended  them 
to  be. 

On  the  other  hand,  you're  likely  to 
encounter  several  problems  on  the  put- 
ting green.  Long  putts  are  more  often 
easier  to  sink  than  short  putts.  More 
than  once  1  experienced  a  glitch  when 
trying  to  tap  in;  the  result  resembled  a 
shanked  iron  shot  more  than  it  did  a 
putt.  I'm  a  long-time  advocate  of  diffi- 
cult putting  in  commercial  golf  games, 
but  this  lack  of  realism  is  not  the  answer. 

Reproducing  a  golf  course  with 
computer  graphics  can  be  just  as  tough 
as  programming  the  game.  Tees,  fair- 
ways, long  and  short  rough,  sand  traps, 
trees,  water,  and  putting  greens  make 
up  practically  every  golf  course,  and 
portraying  them  all  on  one  computer 
screen  is  next  to  impossible  on  the  64. 
Accolade  makes  an  admirable  attempt, 
but  the  results  appear  overdone.  On 
many  par  3  holes  you  have  to  search  to 
find  the  green,  and  without  the  flagstick 
indicator,  the  search  would  be  endless. 


l-irst-timo  computer  golfers 
shouldn't  be  put  off  by  the  criticisms 
found  here,  jack  Nicklaus  is  one  of  the 
best  golf  software  packages  available 
for  the  64,  with  a  vast  inventory  of  good 
features  that  overshadow  the  draw- 
backs. As  in  real  golf,  a  couple  of  good 
shots  erase  the  bad  ones  and  keep  you 
coming  back  for  more. 

— -David  Hensley,  jr. 

Jack  Nicklaus'  Greatest  18  Holes  of 

Major  Championship  Golf 

Accolade 

550  S.  Winchester  Blvd. 

San  lose,  CA  95123 

S29.95 


Double  Dare  and 
Holly  wood  Souares 

Your  kids  will  complain  that  they  don't 
get  messy,  and  you  may  complain  that 
you  don't  get  to  keep  the  car.  Aside 
from  that.  Double  Dare  and  Hollyivood 
Squares,  two  games  from  GameTek, 
provide  almost  as  much  fun  as  the  orig- 
inal television  game  shows.  Like  Wheel 
of  Fortune,  these  two  games  make  a  sur- 
prisingly faithful  transition  from  TV  to 
computer. 


Ani/  fan  of  the  TV  games 

iviil  enjoy  these 

thoughtfully  rendered 

computer  versions. 


Hollywood  Squares  introduces  you 
to  a  panel  of  celebrities  who  come  pre- 
pared with  quips  and  gag  lines  to  help 
you  win  (or  lose)  this  dandified  version 
of  tic-tac-toe.  On  certain  rounds  there's 
even  a  Secret  Square  with  a  bonus 
prize.  The  trivia  questions  used  in  this 
game  are  typical  fare — sometimes 
deep,  not  always  easy,  but  always 
primed  for  humor.  For  instance:  "It  Is 
defined  as  a  puzzling  question  or  an 
enigma,  which  is  to  be  solved  by  guess- 
ing. .  .  .  What  is  it?"  Humorous  re- 
sponse: "Finding  a  bra  in  your 
husband's  lunch  box."  Star's  actual  an- 
swer: "A  riddle." 

It's  obvious  someone  worked  hard 
to  make  the  computer  version  of  Hotly- 
wood  Squares  as  much  fun  as  the  TV 
show.  In  addition  to  the  questions,  an- 
swers, and  wisecracks,  the  animation  is 
also  good.  Our  only  criticism  is  that  the 
sere  en -clearing  routine  seems  to  take 
forever.  Still,  don't  let  that  bother  you. 
Hollywood  Squares  is  the  laid-back  sort 


Daubte  Dare 


in0~tO     elm    "HI)I>1.1    BaohT^ 


for  fllex^s   Ans«rerl 


Hollywood  Squares 


of  trivia  game  that  finds  a  comfortable 
place  at  a  party  or  get-together  where 
you  don't  pay  constant  attention 
anyway. 

Double  Dare — for  those  of  you 
without  kids — is  based  on  a  recently 
created  game  show  that  combines  trivia 
questions  with  the  reliable  capacity 
children  have  for  getting  one  another  in 
trouble  and  the  usually  taboo  fun  of 
getting  incredibly  messy. 

Contestants  have  the  choice  of  an- 
swering a  question  or  daring  an  oppos- 
ing two-person  team  to  answer.  If  that 
team  dares  back,  you  must  answer  or 
take  a  Physical  Challenge.  In  the  TV 
version,  a  challenge  may  consist  of 
throwing  wet  sponges  into  a  bucket  un- 
til it  is  heavy  enough  to  tip  a  second 
bucket  of  gooey  syrup  onto  your  part- 
ner's head. 

While  the  computer  version 
doesn't  provide  opportunities  for  such 
personal  messiness,  it  does  require  dex- 
terity as  you  face  various  arcade  chal- 
lenges. Timing,  in  particular,  plays  a  big 
factor  toward  success. 

At  the  end  of  a  game,  the  winning 
team  faces  an  obstacle  course.  This  is 
where  arcade  skills  really  count.  While 
TV  players  cope  with  a  mess,  computer 
contestants  face  the  frustration  of  not 
being  able  to  get  anywhere.  To  make  it 
tougher,  the  devious  minds  behind  this 
game  have  decreed  that  forward  on  the 
joystick  is  right  and  backward  is  left, 
left  is  back  and  right  is  forward — kind 
of  like  adding  a  blindfold  to  a  live  chal- 
lenge, just  to  make  it  harder. 
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The  trivia  questions  in  Double  Dare 
range  from  old  TV  shows  to  modem 
music  to  current  events,  and  while 
some  Physical  Challenges  are  easy, 
others  are  impossible.  The  best  way  to 
play  this  game  is  in  pairs — with  one 
smart  player  providing  reliable  answers 
to  the  trivia  and  someone  adept  at  ar- 
cade games  handling  the  challenges. 

Animation  here  is  quite  good,  par- 
ticularly the  obstacle-course  sequence. 
The  obstacles  are  straight  from  TV,  and 
the  graphics  are  terrific.  When  the  clock 
counts  down  during  a  question,  the 
contestants'  facial  expressions  are  great. 

We  also  liked  the  way  the  program 
lets  you  choose  your  screen  persona. 
Cycle  through  four  different  possibili- 
ties untril  you  find  one  you  like.  Actual- 
ly,  both  programs  make  note  of  a 
player's  gender,  so  appropriate  graph- 
ics appear  onscreen. 

Be  careful  to  follow  the  Instruc- 
tions exactly  when  loading  the  game. 
Don't  include  the  ,1  most  commercial 
programs  require.  It  will  sabotage  the 
load.  Both  programs  work  fine  with 
FastLoad.  This  is  especially  helpful 
with  Double  Dare. 

We  were  most  impressed  with  the 
dedication  to  details  and  by  the  way 
producers  maintained  the  original 
game  formats.  Where  many  programs 
adapted  from  another  medium  skimp 


on  rules,  method,  or  prizes,  these  two 
do  not.  Any  fan  of  the  TV  games  will 
enjoy  these  64  versions.  And  even  if 
you're  not  a  fan,  we  think  you'll  get  a 
kick  out  of  these  games  anyway. 

— David  &  Robin  Minnick 

Hollywood  Squares 

Double  Dare 

GameTek 

2999  NE  191  St. 

Suite  800 

North  Miami  Beach,  FL  33150 

$14.95  each 


Pomrplav  Hockey: 

USA  vs,  USSR 

At  the  risk  of  alienating  true  hockey 
fans  (who  seem  to  make  up  about  one- 
half  the  population  of  (he  United  States 
and  Canada),  I'm  going  to  say  it:  I've  al- 
ways suspected  a  good  portion  of  your 
enjoyment  of  the  game  comes  first  in 
anticipating  and  then  in  watching  the 
inevitable  fisticuffs.  There — I've  said  it. 
When  a  fight  broke  out  the  first 
time  !  played  Powerplay  Hockey,  I  knew 
Electronic  Arts  had  given  the  game  a  le- 
gitimacy it  could  have  acquired  in  no 
other  way. 


You  don't  have  to  be  told  that  ice 
hockey  is  a  fast  game,  but  you  should 
know  that  this  version  of  the  game, 
which  pits  the  U.S.  against  the  U.S.S.R, 
sacrifices  nothing  in  speed.  To  me, 
watching  the  monitor  and  trying  to 
keep  track  of  the  puck  is  like  watching  a 
televised  game  of  hockey. 

The  camera  pans  across  the  ice 
swiftly  and  smoothly,  sometimes  leav- 
ing behind  players  who  either  are  slow 
or  have  foolishly  skated  off  in  the  wrong 
direction.  The  puck  and  the  players 
move  as  though  they're  on  real  ice  and 
follow  the  rules  of  the  real  game. 

Controlled  by  either  the  computer 
or  a  friend,  your  opponent  is  the  Rus- 
sian hockey  team.  (You  remember 
them^at  the  Lake  Placid  Olympics, 
they  learned  to  believe  in  miracles.)  The 
game  has  three  difficulty  levels. 

You  can  play  one-on-one  or  have 
full  teams  of  five  on  the  ice.  Either  way, 
you  control  only  the  center,  taking  the 
face-offs  and  leading  the  attacks.  In  the 
one-on-one  game,  your  opponent  is  the 
center  until  you  gain  control  of  the 
puck;  then  the  computer  controls  the 
goalie.  The  computer  always  controls 
your  goalie. 

In  the  full-team  game,  the  same 
controls  apply.  The  wings  and  the  de- 
fensemen  on  both  sides  are  controlled 
by  the  computer.  They  do  their  jobs  to 
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the  best  of  their  abilities — unless  you 
mess  up. 

Even  if  you  do  mess  up,  the  team 
can  play  almost  as  well  without  you. 
While  it's  difficult  to  keep  track  of  the 
center  in  a  team  game,  the  team  is  per- 
fectly capable  of  stealing  the  puck,  pass- 
ing it  down  the  ice,  and  attempting  goals. 

You'll  want  to  watch  your  team  for 
signs  of  fatigue.  On  the  score/penalty 
board  at  the  top  of  the  screen,  a  shrink- 
ing line  tracks  its  stamina.  You  can 
choose  one  of  three  teams:  one  good  on 
offense,  one  good  on  defense,  and  one 
balanced. 

As  the  team  leader,  you'll  have  to 
take  the  bitter  with  the  sweet.  If  a  penal- 
ty is  called,  you're  the  one  who  sits  in 
the  penalty  box.  Penalties  occur  for  the 
usual  reasons:  roughing  and  cross- 
checking. Other  defensive  moves  you 
may  enjoy  are  body  checks,  poke  checks, 
and  slide  blocks.  Of  the  three,  body 
checking  seems  the  easiest  way  to  start  a 
fight  and  end  up  in  the  penalty  box. 


You  control  the  game  with  the  joy- 
stick and  fire  button.  There  are  quite  a 
few  combinations  you'll  have  to  re- 
member in  order  to  execute  both  offen- 
sive and  defensive  moves.  No  matter; 
learning  is  part  of  the  fun. 

As  in  any  hockey  game,  the  action 
lasts  for  three  periods.  In  this  case,  you 
can  select  periods  of  2,  8,  or  20  minutes. 
Though  the  length  of  a  penalty  period 
increases  in  proportion  to  the  length  of 
the  period,  it  doesn't  matter  much  in  a 
one-on-one  game.  In  a  one-on-one 
game,  the  action  freezes  for  a  moment 
and  then  you  face  off  in  the  circle  near- 
est the  goal  you're  defending. 

At  the  end  of  each  period,  the 
screen  shows  the  statistics  (shots  and 
goals)  for  each  player.  At  the  end  of  the 
final  period,  you  see  the  statistics  for 
the  entire  game  and  know  whether 
you've  lost  or  handed  the  Russian  team 
yet  another  miracle. 

As  a  semi-reward,  statistic  screens 
are  accompanied  by  the  appropriate  na- 
tional music  ("Yankee  Doodle  Dandy" 
plays  when  the  U.S.  is  ahead).  At  the 
end  of  the  game,  a  typical  cityscape 
from  the  winning  country  appears  on 
the  screen  along  with  a  congratulatory 
message. 
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The  documentation  for  Powcrplay 
Hockey  is  brief  but  good.  Even  those 
who  are  not  hockey  fans  vrill  soon  un- 
derstand the  rules.  For  example,  none 
of  my  friends  who  are  true-blue  fans 
have  ever  been  able  to  explain  what 
tL'idX  the  puck  means.  Yet  after  only  a 
few  games,  my  son  couid  explain  it. 


Watching  the  screen  is 

like  watching  a  televised 

game  of  hockey. 


I  should  note  that  the  documenta- 
tion occupies  a  single  large  sheet.  On 
the  reverse  side  is  a  mini-poster  show- 
ing the  ultimate  captain  of  the  Red 
team.  His  nickname  is  Gorby,  You'll 
recognize  the  fellow  even  though 
you're  not  used  to  seeing  him  in  his 
team  helmet. 

— Ervin  Bobo 

Powerplay  Hockey:  USA  vs.  USSR 

Electronic  Arts 

1820  Gateway  Dr. 

Sail  Mateo,  CA  9440i 

S24.95 


Calculator  128 

Calculator  128  isn't  Malhemalica,  but 
then  that  particular  piece  of  software 
probably  will  never  be  ported  to  the 
Commodore  128  and  64.  It  isn't  a 
spreadsheet,  either.  What  you'll  find  in 
this  simple,  yet  comprehensive  pro- 
gram is  a  practical  calculator  capable  of 
assisting  with  the  family  budget  as  well 
as  providing  useful  calculating  capabili- 
ties for  students  in  physics,  trigonom- 
etry, and  electronics. 

Despite  its  name.  Calculator  128 
will  run  equally  well  on  the  Commo- 
dore 64.  It  is  one  of  those  rare  commer- 
cial products  without  copy  protection 
and  written  entirely  in  BASIC.  Since  it's 
so  open  to  inspection,  the  package  of- 
fers student  programmers  the  opportu- 
nity to  see  the  sorts  of  professionally 
written  algorithms  that  go  into  a  finan- 
cial and  trigonometric  calculator. 
(When  you  load  the  program  into  mem- 
ory, you'll  probably  want  to  correct  a 
spelling  error  on  line  313  where  recipro- 
cal is  spelled  riciprocat.  On  the  other 
hand,  maybe  that  sort  of  thing  only 
drives  editors  crazy.  If  so,  forget  1  men- 
tioned it.) 

Calculator  128  can  figure  out  loan 
payments,  prompting  you  for  selling 
price,  sales  tax,  insurance,  and  other 
costs,  down  payment,  interest  rate,  and 
number  of  monthly  payments.  After  a 


second  or  two  of  calculation,  it  provides 
you  with  an  estimated  monthly  pay- 
ment. The  program  offers  the  warning 
that  interest  rates  are  calculated  in 
many  different  ways  and  that  the  an- 
swer provided  by  Calculator  128  Is  only 
an  estimate. 

The  program  provides  a  conver- 
sion utility  that  converts  between  Cel- 
sius and  Fahrenheit;  millimeters  and 
inches;  meters  and  inches,  feet,  or 
yards;  kilometers  and  miles;  cubic  cen- 
timeters and  cubic  inches;  cubic  meters 
and  cubic  feet;  milligrams  and  grains; 
kilograms  and  pounds;  liters  and  gal- 
lons; watts  and  horsepower;  pounds 
and  gallons  of  water;  and  a  long  list  of 
more  complex  conversions  such  as 
translating  liters  per  second  to  gallons 
per  minute. 

The  publisher  suggests  that  this 
software  will  assist  with  statistical  cal- 
culations. Although  the  calculator  has  a 
"memory"  feature,  it's  no  more  in- 
volved than  the  memory  of  a  simple 
hand-held  calculator  available  for  a  few 
dollars.  Calculator  I28can'tby  itself  cal- 
culate chi  squares  or  standard  devi- 
ation. In  fact,  for  most  simple  math 
problems,  you  would  be  hard-pressed 
to  find  a  calculator  more  powerful  than 
the  immediate  mode  of  the  64  or  128. 
For  much  more  complex  mathematics 
involving  control  groups  and  popula- 
tion studies,  you  should  purchase  a 
spreadsheet  like  Excel  and  a  Mac  or  an 
AT  clone  to  run  it. 


A  simple  yet 

comprehensive  program 

that  wilt  help  students  in 

physics,  trigonometry, 

and  electronics — as  well 

as  the  person  doing  the 

family  budget. 


For  the  intermediate-level  user,  the 
student  of  trigonometry,  the  salesperson 
trying  to  figure  out  income,  anyone 
who  often  makes  conversions  between 
U.S.  and  foreign  measurements,  the  po- 
tential home  buyer  trying  to  decide 
whether  he  or  she  can  afford  a  house  of 
a  given  price,  or  the  student  program- 
mer interested  in  seeing  how  this  sort  of 
program  is  put  together,  Calculator  128 
is  worth  a  look. 

—Robert  Bixby 

Calculator  128 

Educational  Software 

4328  Ridgecrcst 

Amarillo,  Texas  79109 

$9.95  6 
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You've  received  a  message  that 
Tyrabian  mine  layers  have  been 
spotted  just  outside  the  Earth's  at- 
mosphere, IntelHgence  reports  indi- 
cate that  the  Tyrabians  intend  to 
conquer  the  planet  without  destroy- 
ing it.  The  first  wave  of  attack  will 
attempt  to  destroy  major  miHtary  in- 
stallations. The  second  wave  will 
shut  down  the  planet's  major  power 
stations.  The  third  wave  will  crush 
any  remaining  pockets  of  resistance. 
You're  the  commander  of  the 
interceptor  base  in  the  Gamma 
quadrant.  As  such,  it's  your  job  to 
see  that  the  Gamma  power  station 
remains  online  and  operational. 
Failure  could  lead  to  the  Earth's  de- 
struction. You  have  nine  Sigma  V 
remote-control  drone  ships.  The 
drones  are  equipped  with  the  latest 
in  impulse-laser  technology.  From 
the  interceptor  control  tower  over- 
looking the  power  station,  you 
must  destroy  first  the  Tyrabian 
mines  and  then  the  mine  layer  it- 
self. Five  sectors  (blue,  yellow, 
white,  green,  and  red)  must  be 
cleared  before  the  power  station 
will  be  safe. 

Typing  It  In 

Mine  Sweeper  is  written  entirely  in 
machine  language,  so  you'll  need  to 
use  "MLX,"  the  machine  language 
entry  program  found  elsewhere  in 
this  issue,  to  enter  it.  The  MLX 
prompts,  and  the  values  you  should 
type  in,  are  as  follows: 

Starling  address:     OSOl 
Ending  address:      2468 

Be  sure  to  save  a  copy  of  the  pro- 
gram before  exiting  from  MLX. 
Mine  Sweeper  can  be  loaded  and 
run  like  a  BASIC  program.  To  start 
the  game,  load  Mine  Sweeper  and 
type  RUN. 

The  opening  screen  is  filled 
with  the  view  from  the  remote 
viewer  in  the  control  tower.  Initial- 


INE 

SWEEPER 


Ben  Campbell 

Arcade  action  at  its  best! 
This  game's  frantic  pace 
will  keep  you  riveted  to 
the  screen  for  hours.  For 
the  64.  Joystick  reqiaired. 
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//  takes  several  shots  to  get  past  the 
mine  layer  in  this  fast-action  arcade 
challenge. 

ly,  the  viewer  looks  out  over  the 
power  station.  On  the  right  side  of 
the  display,  from  bottom  to  top,  are 
indicators  for  the  current  sector,  the 
number  of  drone  ships  remaining  in 
your  arsenal,  and  your  score. 

Press  the  fire  button  to  begin 
and  the  first  drone  ship  appears  in 
the  center  of  the  viewer.  The  re- 
mote viewer  always  remains  cen- 
tered on  the  currendy  active  drone 
ship.  When  you  move  the  joystick 
left  or  right,  the  ship  turns  left  or 
right,  respectively,  but  remains  cen- 
tered in  the  display.  When  you 
move  the  joystick  up  or  down,  the 
ship  moves  vertically  within  the 
display.  Pressing  the  joystick  but- 
ton fires  the  pulse  lasers.  Holding 
down  the  joystick  button  causes  the 
pulse  lasers  to  fire  rapidly,  but  the 
drain  on  the  drone's  power  plant  is 
so  great  that  your  maneuverability 
is  severely  depleted. 

To  save  the  power  station,  you 
must  clear  the  mines  from  the  five 


sectors  adjacent  to  it.  You  clear  a 
sector  by  destroying  the  mines  with 
the  pulse  lasers  in  the  drone.  You 
will  encounter  three  types  of  mines. 
Trackers,  distinguished  by  their  or- 
ange color,  home  in  on  moving  ob- 
jects and,  like  all  mines,  explode  on 
contact.  The  only  way  to  avoid 
trackers  is  to  shoot  them  before 
they  get  close.  Sweepers^  which  pa- 
trol the  entire  airspace  above  a  sec- 
tor by  constantly  sweeping  up  and 
down,  are  distinguished  by  their 
blue  color.  The  best  tactic  for  bat- 
ding  sweepers  is  to  keep  your  drone 
low.  A  searcher  scans  the  sector  and 
then  moves  directly  toward  any  ob- 
ject it  detects.  Searchers  are  distin- 
guished by  their  green  color  and  are 
nearly  impervious  to  frontal  as- 
sault; the  best  way  to  fight  them  is 
to  dodge  and  attack  from  behind. 

Once  all  the  mines  in  the  sector 
have  been  destroyed,  the  mine  lay- 
er must  be  destroyed.  Mine  layers 
have  a  pulse  laser  much  like  the 
one  in  the  drone  ships.  This  laser  is 
an  older  model  and  can't  fire  as  rap- 
idly as  a  drone's  can,  but  it's  power- 
ful enough  to  destroy  a  drone  with 
only  one  hit.  Mine  layers  are  pro- 
tected by  a  powerful  force  field. 
Each  time  you  hit  one  with  your 
pulse  laser,  the  field  is  weakened, 
but  it's  constantly  renewed  by  the 
mine  layers'  engines.  You'll  have  to 
hit  it  many  times  to  bring  it  down.  If 
your  drone  is  destroyed,  the  mine 
layers'  force  field  regenerates  to  full 
power  before  you  can  activate  a 
new  drone. 

You  must  clear  the  blue,  yel- 
low, white,  green,  and  red  sectors 
in  order  to  save  the  power  station. 
Periodically  (every  50  points),  a 
new  drone  ship  is  prepared  for  acti- 
vation. You'll  need  as  many  drones 
as  you  can  muster  to  save  the  power 
station. 
See  program  listing  on  page  72.       G 
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What  would  you  do  if  you  lived  on 
the  edge  of  a  cemetery  and  your 
backyard  was  invaded  every  night 
by  hungry  ghouls  and  goblins? 
You'd  fire  up  the  old  barbecue  pit, 
that's  what! 

Monster  Dar-B-Q  takes  place  in 
your  backyard  cemetery.  In  the 
foreground  are  three  rows  of  tomb- 
stones and  the  crosshairs  for  your 
special  ghoul  zapper.  In  the  back- 
ground stands  your  home,  with  its 
illuminated  windows.  On  a  tree 
branch  rests  a  sleepless  owl  — 
blinking  its  eyes  while  observing 
the  ruckus  below.  Lightning  strikes 
and  thunder  rolls  to  signal  the  start 
of  the  game. 

Using  the  tombstones  for  cover, 
a  variety  of  dreadful  monsters  pop 
up  and  down.  These  ghouls  include 
the  Vampire,  Wolfman,  Creature, 
Monster,  Mummy,  Red  Devil,  and, 
last  but  not  least.  Red  Skeleton  {sic!). 

With  your  joystick  plugged 
into  port  2,  position  the  crosshairs 
over  any  monster's  face;  then  press 
the  fire  button  to  vaporize  the 
beast.  The  crosshairs  of  your  ghoul 
zapper  can  move  diagonally  and 
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Charming  graplucs 
highlight  this  novel  game 

for  kids  of  all  ages. 

For  flic  Commodore  128. 

Joystick  required. 

Culten  O'Day 


wrap  around  at  the  screen's  edge. 
Make  use  of  these  features;  later  in 
the  game,  those  monsters  don't 
stick  around  very  long. 

Scoring  is  straightforward. 
Each  monster  you  zap  gives  you 
100  points.  Escaping  monsters  costs 
you  150  points;  misses  cost  you  50 
points. 

There  are  five  rounds  in  the 
game.  A  flash  of  lightning  signals 
the  beginning  of  each  round.  As 
you  advance  through  the  rounds, 


the  monsters  appear  and  disappear 
more  quickly.  The  game  ends  when 
you've  played  five  rounds  or  when 
the  total  number  of  misses  and  es- 
caped monsters  exceeds  10. 


Fire  up  the  barbecue— the  monsters 
are  back! 

Typing  It  In 

Monster  Bar-B-Q  is  written  in 
BASIC  7.0.  To  prevent  typing  mis- 
takes, use  "The  Automatic  Proof- 
reader," found  elsewhere  in  this 
issue,  when  entering  the  program. 
Once  you've  finished  typing  the 
program,  be  sure  to  save  a  copy  to 
disk  or  tape  before  you  run  it.  6 
See  progratn  listing  on  page  81. 


Mxfl-^^l+H 
M^fl+Gxl 


Let's  set  the  scenario:  A  wizard 
hands  you  a  crossbow.  Suddenly,  a 
math  problem  appears.  In  front  of 
you,  there  are  four  colored  boxes 
with  numbers  inside.  The  wizard 
expects  you  to  shoot  an  arrow  at  the 
box  that  contains  the  correct  an- 
swer. You  take  aim  and  release. 
Bulls-eye!  You've  hit  the  target! 
With  a  puff  of  smoke,  the  problem 
disappears.  You  never  knew  math 
could  be  so  much  fun. 

Getting  Started 

"Math  Magic"  is  written  in  128 
BASIC.  Type  in  and  save  the  pro- 
gram. Be  sure  to  use  "The  Automat- 
ic Proofreader,"  found  elsewhere  in 
this  issue,  to  ensure  that  you  don't 
make  any  typing  mistakes. 

To  play  Math  Magic,  load  the 
program,  plug  a  joystick  into  port  2, 
and  type  RUN.  A  menu  screen  will 
appear.  Select  the  type  of  problems 
you  want  to  practice.  Your  choices, 
numbered  1  -4,  are  addition,  subtrac- 
tion, multiplication,  and  division. 

Next,  choose  a  level  of  difficul- 
ty (1-13)  and  press  RETURN.  Level 
1  is  the  easiest;  level  13,  the  most 
difficult. 

After  you've  entered  your 
choices,  the  playing  field  appears. 
To  your  right  is  the  wizard  with  a 
math  problem  beside  him.  Above 
your  crossbow  are  four  colored  box- 
es with  numbers  inside. 

Using  your  joystick,  position 
the  crossbow  under  the  box  with 


Michael  Kaelin 

An  arcade-style  math 
game?  That's  "Math 

Magic,"  a  clever 

educational  tool  for 

children  5-9  years  of  age. 

For  the  Commodore  128 

with  a  joystick. 


HO  3 

14'  8 


the  correct  answer  to  the  problem 
and  press  the  fire  button,  if  you're 
right,  you're  awarded  ten  points 
and  a  new  math  problem  appears. 
If  you're  wrong,  the  problem  re- 
mains on  the  screen  until  you  cor- 
rectly answer  it. 


Good  marksmanship  and  fiH'ii  better 
arithmetic  skills  are  the  keys  to  success 
in  this  educational  game  for  children. 

If  you  answer  five  problems 
correctly  within  one  minute,  you 
advance  to  the  next  level.  "The 
green,  yellow,  and  red  bar  at  the 
bottom  of  the  screen  helps  you 
keep  track  of  how  much  time  re- 
mains. If  the  time  expires  before 
you  complete  the  level,  the  game 
ends.  You  win  the  game  by  advanc- 
ing through  level  13. 

String  up  your  crossbow  and 
grab  your  arrows  because  there  are 
problems  to  solve.  Who  knows? 
The  wizard  may  perform  a  little 
math  magic  and  turn  you  into  a  real 
math  wiz. 
See  pra^yam  listing  on  paj^c  79.       G 
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The  "CHR$  Graphics"  edilor  automati- 
caliy  redefines  the  64's  character  set 
when  you  create  your  multicolor 
draiL'ings. 


CHR$  Graphics 


Hubert  Cross 

You've  never  had  this  much  control  over  your  graphics 
cJiaracters.  With  this  utility,  you  can  design  and  animate  large 
multicolor  images — up  to  112  X  122  pixels — all  from  BASIC. 
For  the  64.  Joystick  and  disk  drive  required. 


"CHR$  Graphics"  is  a  graphics  edi- 
tor of  a  different  sort.  It  uses  rede- 
fined characters  to  generate  shapes, 
but  the  images  you  design  are  not 
limited  to  an  8  X  8  pixel  area — they 
can  be  up  to  112  X  112  pixels  (14 
X  14  characters)  in  size.  You  can 
design  as  many  as  256  of  these  im- 
ages. The  editor  allows  you  to  flip 
your  images,  shift  them  in  any  di- 
rection, and  save  them  to  disk. 
CHR$  Graphics  makes  creating 
complex  character  graphics  as  easy 
as  using  a  good  sprite  editor. 

To  help  you  use  the  graphics 
that  you  design,  CHRS  Graphics 
adds  six  commands  to  BASIC  for 
loading,  saving,  placing,  and  eras- 
ing your  shapes.  Once  CHR$ 
Graphics  is  in  memory,  both  the 
shape  editor  and  extra  commands 
are  accessible,  providing  an  effec- 
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tive,  all-in-one  graphics  develop- 
ment system. 

Getting  Started 

Program  1,  CHR$  Graphics,  and 
Programs  2  and  3  are  written  en- 
tirely in  machine  language,  so  use 
"MLX,"  found  elsewhere  in  this  is- 
sue, when  you  enter  these  programs. 
When  prompted  by  MLX,  respond 
with  the  values  given  below. 


Progriim  1 

Starting  iiddrcss: 
Ending  .address: 

Progrim  2 

Starling  address; 
Ending  address: 

Progr.ini  3 

Starting  address: 
Ending  address: 


S7C00 
S903F 


S3F90 
$405F 


S3C10 
S41AF 


After  you've  typed  in  all  the  data, 
be  sure  to  save  a  copy  to  disk  before 
leaving  MLX.  Save  Program  1  with 
the  name  CHR  GRAPHICS,  Pro- 
gram 2  with  the  name  DEMO 
.FlLEl,  and  Program  3  with  the 
name  DEMO.FILE2. 

Program  4  is  written  in  BASIC. 
Use  "The  Automatic  Proofreader," 
also  found  in  this  issue,  to  type  it  in; 
then  save  it  with  the  name  DEMO. 
Before  you  begin  typing,  you  must 
load  Program  1  and  activate  it  with 
the  command  SYS  31744.  When 
you  finish  entering  the  demo,  be 
sure  to  save  a  copy  to  disk.  After 
saving  the  demo  program,  run  it  to 
get  an  idea  of  how  powerful  CHR$ 
Graphics  is.  Although  the  demo  is 
25  lines  long,  the  actual  work  of 
drawing  and  erasing  images  is  done 
in  just  8  lines  of  code. 

The  Editor 

CHRS  Graphics'  editor  is  where 
you  design  custom  character  graph- 
ics for  your  programs.  Plug  a  joy- 


stick  into  port  2;  type  LOAD  "CHR 
GRAPHICS", 8,1;  and  then  type 
SYS  31744  to  enable  CHR$  Graph- 
ics. Type  the  command  EDITOR  to 
activate  CHR$  Graphics'  image  edi- 
tor. The  editor  initially  starts  in 
multicolor  mode  with  a  white  bor- 
der and  a  black  background.  A  14 
X  14  character  box  appears  in  the 
lower  left  corner  of  the  screen.  The 
images  you  design  are  displayed 
full-size  in  this  box.  Note  the  char- 
acters at  the  top  of  the  screen.  As 
you  create  your  images,  you'll  see 
these  characters  being  redefined. 

To  the  right  of  the  character 
box  is  a  grid  showing  a  magnified 
portion  of  your  image,  A  small  blue 
rectangle  in  the  grid  outlines  the 
character  being  redefined.  Because 
CHR$  Graphics  starts  in  multicolor 
mode,  characters  are  4  pixels  wide 
X  8  pixels  high.  When  in  hi-res 
mode,  characters  are  8  pixels  wide 
X  8  pixels  high.  Since  multicolor 
pixels  are  twice  as  wide  as  hi-res 
pixels,  the  character  width  remains 
the  same  no  matter  which  mode 
you  are  in.  Press  M  to  toggle  be- 
tween multicolor  mode  and  high- 
resolution  mode. 

Use  the  joysdck  to  move  the 
cursor.  To  quickly  move  to  the 
upper  right  corner,  press  CLR/ 
HOME,  To  fill  in  a  square,  use  the 
joystick  to  move  the  cursor  to  the 
square  and  then  press  the  fire  but- 
ton. Pressing  the  fire  button  acts  as 
a  toggle:  Press  the  fire  button  once 
to  fill  a  square;  press  the  fire  button 
again  to  clear  the  square. 

While  in  the  editor,  you  may 
find  the  cursor  moves  too  fast  or  too 
slow.  You  may  adjust  the  speed  of 
the  cursor  by  pressing  any  of  the 
number  keys  at  the  top  of  the  key- 
board. Press  0  to  make  the  cursor 
move  as  fast  as  possible;  press  9  to 
make  the  cursor  move  as  slowly  as 
possible.  Use  the  cursor  keys  to 
move  the  cursor  one  character  at  a 
time, 

CHR$  Graphics  contains  256 
frames,  with  one  image  per  frame. 
The  number  of  the  current  frame  is 
displayed  above  the  character  box. 
An  uppercase  F  (for  Frame)  appears 
just  before  the  number.  You'll  need 
to  keep  track  of  the  frame  number 
in  order  to  recall  the  shape  from 
within  a  program. 

As  you  design  shapes,  CHR$ 
Graphics'  editor  automatically  re- 
defines characters  to  create  the  im- 
age that  you  draw.  The  ASCII  value 


of  the  character  being  redefined  is 
displayed  above  the  grid.  You  do 
not  need  to  know  this  number  to 
use  the  program;  it  is  there  simply 
for  your  convenience.  Initially, 
empty  areas  of  your  drawing  are 
represented  by  null  characters 
(those  with  an  ASCII  value  of  0). 
Unlike  spaces  (ASCII  32),  null  char- 
acters are  not  drawn  when  an  im- 
age is  stamped  to  the  screen. 

Colors 

In  multicolor  mode,  characters  are 
drawn  using  three  colors  (pens).  Se- 
lect a  pen  using  the  function  keys. 
Press  f3,  f5,  or  f7  to  select  pen  1,  2, 
or  3,  respectively.  To  change  the 
color  of  the  active  pen,  press  either 
the  Commodore  or  the  CTRL  key 
together  with  one  of  the  color  keys 
at  the  top  of  the  keyboard.  Note 
that  there  are  only  eight  colors 
available  for  pen  3 — black  through 
yellow  (CTRL-1  through  CTRL-8), 
Also,  whenever  you  change  the 
color  of  a  pen,  every  pixel  drawn 
with  that  pen  changes  color  as  u^ll. 

Press  B  to  increment  the  back- 
ground color.  When  you  change  the 
background  color,  the  color  of  the 
character  set  at  the  top  of  the  screen 
changes  to  a  color  having  a  good 
contrast  with  the  new  background 
color.  Press  SHIFT-B  to  decrement 
the  background  color. 

Press  G  to  increment  the  grid 
color;  press  SHIFT-G  to  decrement 
the  grid  color.  In  multicolor  mode 
there  are  only  eight  colors  available 
for  the  grid.  Press  S  to  increment 
the  color  of  the  sprite  that  high- 
lights the  current  character  on  the 
grid.  Press  SHiFT-S  to  decrement 
the  color  of  the  sprite. 

You  have  full-color  control  in 
multicolor  mode  only.  In  hi-res 
mode,  the  only  active  pen  is  pen  3, 
so  you  can  have  only  one  fore- 
ground color  per  character.  Hi-res 
mode  offers  twice  as  many  pixels 
per  character,  however. 

Emptying  the  Gartiage 

Perhaps  the  editor's  most  helpful 
feature  is  its  ability  to  eliminate  un- 
used and  duplicate  character  defini- 
tions. In  CHR$  Graphics,  this  is 
known  as  garbage  collection.  With  a 
little  thrift  and  the  help  of  this  gar- 
bage collection,  you'll  be  able  to  get 
the  most  out  of  the  196  redefinable 
characters  available. 

As  you  draw  your  images,  you 
can  see  how  the  characters  at  the 


top  of  the  screen  are  redefined.  To 
see  how  garbage  collection  works, 
draw  a  long,  straight  line  from  the 
left  border  all  the  way  to  the  right. 
As  you  draw  the  line,  you'll  notice 
the  characters  at  the  top  of  the 
screen  being  redefined  to  display 
the  line. 

After  the  line  has  been  drawn, 
press  C  to  force  CHR$  Graphics  to 
perform  garbage  collection.  CHR$ 
Graphics  displays  the  message 
GARBAGE  COLLECT  during  this 
process.  Carefully  watch  what  hap- 
pens. Your  image  doesn't  change 
shape,  but  you'll  nodce  several  du- 
plicated characters  reappearing  at 
the  top  of  the  screen. 

In  addition  to  eliminating  du- 
plicate character  definitions,  gar- 
bage collection  also  disposes  of 
empty  characters.  (An  empty  char- 
acter is  a  character  that  has  nothing 
drawn  in  it.) 

Shifty  Images 

CHR$  Graphics  is  capable  of  shift- 
ing your  image  by  characters  or  by 
pixels.  Press  U  to  shift  the  image  up 
one  character;  press  D  to  shift  the 
image  down  one  character.  The  L 
and  the  R  keys  shift  the  image  one 
character  left  and  right,  respective- 
ly. The  image  stops  when  it  reaches 
a  border. 

To  shift  the  image  one  pixel  at  a 
time,  hold  down  SHIFT  while  using 
the  keys  mentioned  above.  For  ex- 
ample, SHIFT-U  shifts  the  image 
one  pixel  up.  SHIFT-D,  SHIFT-L, 
and  SHIFT-R  shift  the  image  one 
pixel  down,  left,  or  right,  respective- 
ly. In  multicolor  mode,  pen  color  3  is 
left  behind  when  you  move  an  im- 
age. This  is  a  hardware  limitation. 
Usually,  you  will  have  to  retouch 
color  3  after  shifting  an  image. 

Press  F  to  flip  the  image  hori- 
zontally; press  SHIFT-F  to  flip  it 
vertically. 

Depending  on  the  number  and 
complexity  of  your  shapes,  you  may 
run  out  of  characters  when  you  try 
to  shift  or  flip  an  image.  If  so,  CHR$ 
Graphics  does  some  internal  gar- 
bage collection.  If  there  are  not 
enough  characters  left  after  the  gar- 
bage collection,  CHR$  Graphics  is- 
sues an  OUT  OF  CHRS  message 
and  leaves  the  image  unchanged. 

If  an  image  has  not  reached  the 
border,  yet  it  does  not  move  when 
you  try  to  shift  it  in  that  direction, 
there  is  an  empty  character  in  your 
way.  To  .see  it,  press  fl.  Unused 
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Air  Orders  Processed  Within  24  Hours 


COMMODORE  128D 


MjaKstd 

•  3  Mode  Operation 

\  -GA  Runs  64  software 
2C12B.  Faster,  more 
memory  lor  tncroasod 
produc(ivJTy3'CPW 
Uses  Standard 
cprn  m^es 


$418 


95 


COMMOIKMIE 


•  CommcuiDra  64C  Coinpular 
•Excol  FSO-2  Disk  Drive 

•  CommtxJore  180ZC  Monloi 


64C 
System 
Special 

95 


$449 


COHWODORE  {J 'J  I  I    PC/XT 

Ttie  Commodore  Coll,  a 

computfjf  *ith  sW  thfi 

builr-m  JeaEufe&yoj 

n$ed.  Tha  CoH  includes 

64 OK,  RAM,  CGA  vidao 

support.  Iwo  5  25  360  K 

disk  tin^BS.  serial  and   ^^^^^*«riig~N 

clock  speeds  (4,77/7  16/ 

9.14  MHi), 


Save  $20  on  any 
monitor  of  your  choice. 


$669' 


COMMODORE 

1670  Modem 


Save  [ime  and  Encroasfi 
productivity  with  the  Commodore 
1670  Modem    Th©  1670  utiliiiJS 
the  popular  "AT"  Hayes 
command  sets,  buhft  in  speaker, 
auto  diaL  and  iituloanswQf,  Fof 
aflordEibiFity  and  reliability, 
choose  tire  Commodore  1670 
Modem. 


POWER  SUPPLY 


COMMODORE     64 


Tirod  ot  buying  yet  anolher 
throw-away  bricK  power 
supply  for  yogr  Commodore 
64?  Go  wnh  ihe  Micro  RiD 
Pow&r  Supply,  TheMW 
701 -A  leatures  double  fused 
systems,  schamaiics.  and  a 
one  year  warranty.  Slay 
wiih  it'ebest.  stay  With 
Micro  R&D. 


Excel  FSD-2+  Disk  Drive 


xeiev  Super  Graphics  Goid 


100%  Commodore 
&4C  drive  compatibly, 
the  Eitcoleraior  Plys 
Disk  Drive  fs  qu later. 
smarier.  laster,  and 
more  raliabfe  than  ihfl 
1541  and  1S41C 


$148 


95 


1-y»ar  t/anrnniy 


COMMODORE 


1581 
Disk  Drive 


AcJd  mofB  contpuBng  power 
to  your  Commodore  wirh 
the  1581  Disk  Drive.  Ttie 
1581  features  3.5"  720K 
storaga  capacity  and  DS/ 
00   Add  the  I  SB  I  on  your 
Commodore  today. 


$1  7995 


The  Xetec  Super  Graphics 
Gold  printer  interface 
combines  improved  sp^^. 
features  and  more  memory  to 
satisfy  ^e  mosi  demanding 
user.  Xetec  hasiricorpofated 
a  32K  butler,  16  acUve  DIP 
switches,  a  utitity  disk  witr^  40 
fonts,  ^6  edOittonal 
innovatnw  features  and  a 
Irfetime  warranty  mto  tho 
Super  Graphics  Go^d    Xelec 
now  proviCGs  you  Iha  moat 
complete  printer  inierface 
avaifabis  lor  your 
Commodore. 


The  Epyx  500  XJ  scofes 
significantly  higher,  laster, 

and  easier  Ihan  any  joysmck 
manutaclured.  Tha  500  XJ 
comes  wjih  patm  gnp  ana 
tnggerftnger  firing.  B^oax 
your  previous  record  with  iha 
Epyx  500  XJ 
(AlarJ.Ce^) 


$13 


95 


95 


$74 


500  XJ 


Joystick 


\ 


MAGNAVOX 
CM  8762 


I  GoldStar      2105  A 


MONITORS 


$239 


95 


The  Magnavox  CM  8762  14' 
monrtor  Is  the  sman  ctiOJce  lor 
yourcompuling  needs. 
Standard  resolution  Is  640H  x 
240V    This  monitor  Includos  a 
buili m  lift  star>d  plus  a  green 
text  display  swrtch    For  a 
monitor  v^ith  RGB  TTL  (CGA) 
and  composite  inputs,  stay 
wiih  the  Magnavox  CM  $762. 

SuQffBsIed  use  128D  or  Cpft  PC. 


GoldStar,  a  name  you  can 
depend  on.  now  provides  the 

2105  12"  composite 
monochrome  monitor  lor 
yoyr  computing  needs.  ITie 
GoldStar  2105  supplces  a 
high  resolution  of  G-lOH  x 
200V  loi  IBM,  Commodore, 
Apple  and  Atari  computers 
With  composite  oulputs. 
With  your  choice  of  either 
green  of  amber  display. 
GoldStar's  £l  05  monitor  wiH 
highlight  your  home  or  office 
©imputing  needs. 


1-800-233-8760 


Magnavox 

BM76S2 S84.95 

BM762S $84  9S 

78M-613 $79  95 

7BM-823 .,$79,95 

CMa702 $179.95 

CMS762 «39.95 

SCM-51S $259.95 

gCM-053 $339.95 

9CM-082 $439,95 


GoldStar 

2105  G  Composite    ,  $74.95 
2105  A  Composite  ,,  $79,95 

14tOCGA14- $219,95 

1420  EGA  14" $318,95 

1430  VGA  14- $37995 

1440  Superscan $4  59  95 

Commodore 

1802D  $18995 

1084 $Z79,9S 


1200hc 
Modem 


Vef  satild  pow6r  and 
peftormance   The 
Avaiex  l2(X)hcd«livers 
the  great  features  ol  itie 
,  Avatex  1 200  and  more, 
iriciudFrtg  Kayes^ 
oompaiibiiLty,  ioaik>w 
us«  wllh  vtiually  al! 
leadEiTO  communtcatlDna 
soltware. 
2  year  warraniy. 


Lyco  Means  Total  Service. 


AvtltC'X  Modems  1200E  Modem 


Commodore  Modem 

Connection  Cable  by 

Peak  Peripherals 

Your  lotat  solution  for  Commodore  64/12fl 
to  modem  conneclions. 


95 


$25 


MODEMS 


FuK  HiyesScsmmand 

sei.  on-line  volca/data 

switching,  plus: 

>  2  configuraiion  settings 

•  4  ptione  fiumbeis  stored 

•  External  configurallon 
switches 

•  View  (nenu 
Syetr  mrrtnty 


$69 


95 


Avatex 

1200oPCCar<J $65  95 

12009.,.,. $69.95 

laoop., $89.95 

t200hc  Modem $89.95 

2*001  II  PC  Card $129  95 

2400 $179.95 


-IL 


NX-1000 $164.95 

NX-H)00C(64CI  1169.95 

NX-IOOO Color  $217.95 

NXlOOOCCotoi 

(640) $225.95 

NX.2400 $299.95 

NX-15 $309.95 

NH-IO., $319.9S 

NR.1S $419.95 

Brother 

HR20 $334.95 

M\?09 $364.95 

M1724L $529.95 

HR40 ,$589,95 

SEIKOSHA 

SP  Series  RIBbofi $7.95 

5P  lOTOAi  SI79.95 

SP  )200ASRSZ32 S189  95 

SP1000AP $169  95 

SL80Ai $319,95 

SK3000Ai  $3S9.95 

SK3005Ai $445.95 

SL130A1 $599.95 


Commodore 

1670 $59.95 

Supra 

2400  $119.95 


Hayes 

Smarlmodem  300 $139.95 

SmanmodBm  1200B  ..$279.95 

Sinartniodoml200 $279.95 

Smartmodem  2400 $399  95 

Smartm>d«m  2400B  ..$419.95 


PRINTERS 


#  CITIZEN 

120  D $139.95 

1S0D $159.95 

MSP-40 $279  95 

MSP-50 $299.95 

MSP-15E $339.95 

Triliule  124 $379.95 

MSP,45  $379.95 

MSP-55 $439.95 

Premiere  35 $499.95 

Tribule224 $54995 


Panasonic 


Clditi'A.jlii 

1180 $179.95 

1191  $235.95 

3131  .....■.„ $299.95 

1124 $319.95 

1592 „,.„..„.,.  $369.95 

1595 $429.95 

1524  24  Pin $545.95 


The  320  9 -pin  printer  cs)m tunes  ins 
best  ol  the  OKIDATA  tradition  pi 
reijablj^y  wl!h  the  latest  tn  Wgti-tech 
engineering  lo  creale  a  new 
standard  far  utilily  primers.  The 
result  IS  a  last  printer,  witfi  the 
highesi  speed  and  throughpul  in  its 
class   Turn  ihe  320  loose  at  300 
cps  in  draft  print  and  it  quickly  cleans 
up  detailed  jobs    Turn  out  NLQ 
do<xments  as  required  at  63  r^. 

We  carry  ttw  entirv  ltn« 
and  accessories. 


320 


OK'DATA 


$337 


95 


us  Robotics 

SporlsJer  1200  PC $79.95 

Courier  1200 $169.95 

Courier  2400  PS $259.95 

Courier  2400 $29995 

Courier  24 OOe  $319.95 

Courier  9690  M  ST $619.05 


OKIDATA 

OWmate20 $139.95 

Okimate  20  w/can  ....,.$  1 89.95 

182 $209.95 

180 $219,95 

182-* $225.95 

183 $239.95 

320 .,„., .$337,95 

321  „ $464,95 

390 $464.95 

EPSON 

LXBOO $168.95 

LQ500 $288.95 

FX850 $329.95 

FX1050 $429.95 

LQ8S0  $515.95 


ICITIZEN 


Citizen  120-D 


hpmiijmfi-wmSM. 


II  you  are  seeHIng  world 
renowned  primer 
pertorrrance  tor  your  riomo. 
look  no  further  then  the  1 20- 
D.  Vouf  data  pjocessino 
rweds  are  handled  quickly  al 
aprinispeed  ol  120  cps 
(dralt)  or  25  cps  (NLQ).  The 
120.D  features  9  pin  dot 
matrix  print  quality,  standard 
parallel  cenironics  iniertace 
and  a  4K  text  buffer. 


$137 


95 


Citizen  ieO-D 


You  can  always  rely  on  the 

Ciliien  180-D.  From  its 
price/perlormance  value,  lo 
a  print  speed  of  180  cps 
(draft)  Of  29  cps  (NLQ)  the 
Citizen  tSO'Disan 
Bxceiient  printer  for  the 
fiome  or  small  tjusiness 


$159 


95 


Lyco  Computer 


Marketing 

&  Consultants 


Panasonic 

Office  Automation 


KX-P1191 


Announcfiig  tha  Panasonic  KX-P  1 191 ,  a  9  pin 
printer  with  advanced  leatures  that  put  it  ahead 
ofitscl^^s.  The  1191  features  the  EZ-Sot 
operator  pnnfll  thai  FeEs  you  access  Itie  most 
oommonly  conlroilod  printer  functions  right 
from  Iho  front  panol    The  \  19V  has  Other  ad- 
vanctKl  toaluJOS.  mdud^r^g  an  adjustabfe  push/ 
pull  tractor  feed  and  mulEiple  paper  paths.  All 
these  features  come  packaged  m  a  rugged. 
efQortomic  (tes^gn  with  a  two  year  limited  parts 
and  labor  wafranty. 


^^^  5-^^-«>-J>3-^TT_--^-^ 


$175 


95 


$319 


95 


KX-P  1180 


Tt»  ttBO  by  Panasonic  oHers  you  mora  itian 
what  you  mighi  expect  in  a  low  co^t  printer. 
Wilti  mutliple  papaf  palfis.  varsalile  paper 
handling,  and  front  panef  proflfan^mabiijly 
tnrpvgh  Ihe  EZ  Sm  Opwator  panel,  the  1 180 
is  an  eicelleni  value.  The  1 160  also  lesluras 
2  eitcettant  print  qualities:  Near  Lerter  Oualiiy 
and  Drail.  with  speeds  up  to  192  cp«  in  DratI 
and  3S  cps  in  Near  Lener  Quality  plus  crisp, 
clear  graphics. 


LX-800 


KX-P  1124 


For  excellent  print  quality  in  a  high  speed 
printer,  choose  the  KX-P  1 124.  Its  24  pin  print 
head  prE>dUI^e5  dralt  ts«l  ai  a  qtick  192  cps 
(draft)  or  teller  quality  loxt  ,;63cps.  In 
addition,  the  KX-P  1 124  provkles  such 
standard  lealures  as  seiectablo  push;pull 
tractor.  S  resident  print  fonts,  parallel 
Centronics  intertaco  and  a  standard  6K  buHer 
Panasonic's  KX-P  1 124  ensures  that  your 
printing  will  be  fast  and  pfofesskinal. 


Epsoivr 


$235^5* 


'quantities  limited 


FX-850 


For  last  output  and  profflSsionel  pnr^l  quafity, 
choose  Ep&ort's  LXaOO,  This  full  foaiurod 

60  column  printer  has  a  speed  et  1 80  cps 
(draft)  and  30  cps  {IMLOJ,  Epson's  exclusfve 
SelecTypa  Iront  control  panel  lets  you 
custcmi^e  documents  with  popular  type 
etyla^.  Tha  Epson  LX-BOO  delivers 
affordable,  profasstorral  printing  for  your 
home  or  office. 


LQ-500 

24-pin  quality 

The  Epson  LO-SDO  Is  at  homo  whorijver  letter 
quality  printing  is  required.  Standard  print 
speed  is  1  SO  q>s  (draft)  and  60  cps  (10)   The 
LQ-500  is  ideal  tot  either  the  home  or  the  most 

demanding  business  applications. 


$168 


95 


-.iiiiiiiski^ 


Epson's  FX  printers  are  legendary  in  |he 
compuler  producis  Industry.  The  FXSSO 
continues  Epson's  fong  tradition  of  quality, 
perfornriani:o  and  reliability.  It  prints  al 
2C4  cps  In  draft  mode  and  54  cps  NLQ  - 
insulated  lor  quiet  operation.  Like  all 
Epson  computer  products,  Ihe  FX-B50 
printer  is  supported  by  a  natiorrwlde 
service  network  and  backed  by  Epson's 
t^year  limited  warranty. 


$288 


95 


$329 


95 


F^^'^'^^^--'^^''^^^'^^^^^^^^i^f-^^^^^^^'^---^--^^\T<^^^^^--'^'«^'g^ 


Price  Guarantee 

Since  1981 ,  we  haua  lad  the  industry  by  coilinuing  to  otter  itie  lowest  national  prices  while  providing  quality 
service.  Many  companies  have  come  and  gone  trying  to  imitola  our  quality  and  service.  II  by  some  oversight 
we  do  net  have  the  lowest  prices  advertised  on  the  products  you  desire,  then  we  would  appreciate  Iho  oppor- 
tunity to  rectlty  this  oversight. 


'"■^tttft  ^  tvnn.  s.-e?Ei^ 


'-•Vff-fV'r-'-f  ^  ■T  ^  ■t^  --  ^  ^  1.1.  --XT1  titles 


1-800-233-8760 


Sales;  1-800-233-8760  or  717-494-1030 
Hours:  Monday  through  Friday, 

9:00  a.m.  to  8:00  p.m. 

Saturday,  1 0:00  a.m.  to  6:00  p.m. 

Customer  Service;  717-494-1670 

Hours:  Monday  through  Friday, 

9:00  a.m.  to  5:00  p.m, 

Fax:717-494-1441 


Why  shop  at  Lyco  Computer? 

Lyco  ConnpulQr  Ls  ono  cf,  A  rvol  the  largast,  and  most  QStablishfid  hrms  to  provide  only  quality  nama 
brand  computer  pfoduco  al  prices  30%  to  50%  below  retail,  WeVo  set  many  IndLrstfy  alflndards,  end 
we  are  settmfl  Ihe  paco  tor  many  more  in  the  future.  Our  standards  include;  a  separate  department  lor 
customer  servrce;  a  prica  guar^ntHti;  guarenteed  tactory  fresh  marchandis^:  diverse  paymeni  and 
shipping  policies,  tncEudina  a  C  CD.  policy  which  allows  customers  lo  have  products  in  their  hands 
before  paying  anything.  Si&leciion  places  Lyco  at  the  forefront  ol  Ihe  tntJusiry,  Due  to  our  in-stock 
volume,  we  cannot  advertise  all  of  our  products.  If  you  do  not  see  Ihe  product  you  want  advertised, 
calJ  Lyco  Mari^tiog  toll  free. 

How  do  I  know  I  will  get  the  product  I  need? 

Our  marketing  &talf  li^  weFl-^uCsled  ui  |hs  computer  industry.  Thgy  rnctfivv  continuous  lormal  training 
by  our  manufacturers  which  enabios  Itiem  to  develop  and  maintain  a  high  degree  ol  enpertise  on  the 

prodticts  (Hey  represent    Though  our  slnci  guarantee  on  providing  only  new  merchandise  pfohibsls 
free  tnaL  periods  and  a  guarantee  on  compatiOility.  a  wealth  of  knowledge  is  available  to  our  cu5ton-;e:s 
to  help  witn  the  purchasing  oecision   As  thousands  ol  people  every  week  capitah^o  on  our  savings 
ar>d  services,  we  hope  you  toe,  will  make  Lyco  Computer  your  first  cfiotce. 

What  about  warranty  or  service? 

We  decided  sevmal  years  aqq  that  a  Customer  Service  Department  was  needed  In  the  industry    Un- 

Jortunately.  lew  of  our  competitors  ofler  ttiis  service.  Our  Customer  Service  Department  is  avaifable  at 
(717)  494't670  to  provide  assistance  In  all  warranty  matters.  Our  product  line  en|oys  "name  brand 
recognition,"  and  wo  back  all  of  our  manufacturer's  stated  warranty  terms.  Many  manufacturers  will 
allow  defectivs  products  to  be  exchanged.  Belore  returning  any  Item  that  appears  lo  t>u  detuciive,  we 
asK  that  you  call  our  Customer  Service  Department  to  assist  you  in  determining  <1  ihu  product  Is  dufec- 
tive.  II  the  product  Ls  determined  derective.  they  will  give  you  a  special  aulhenzation  number  and 
speed  processir^Q  ol  your  order. 

Will  you  rush  an  item  to  me? 


Since  1961.  we  h-ave  sat  the  standard  in  the  industry  l3y  processing  orders  within  34  Kours  ■  not  4  to  6 

lay  air,  two  day  air.  standard  UPS, 
Our  records  show  we  lill  95%  ol  our  ofd-ers  daily.  Tempcrary  shortages  are  normally  fiiled'^wrihin  10 


weeks.  We  oWer  next  day  air,  two  day  air.  standard  UPS,  and  postal  Intemadonal  shipping  services. 


days,  ff  an  order  cannot  Iw  tilled  withm  60  days,  we  refund  your  money  m  full,  unless  you  choose  to 
wait  lor  the  order  aruj  |>enelit  from  the  pnce  savings  Any  tirr^e  prior  to  shipment,  you  tna"^  cartel  or 
Change  Itie  oul  oi  stock  product  by  contactjng  our  Customer  Service  representatives 

How  do  I  order? 

Send  your  order  to  LvCO  Computef,  P.O.  Box  60B8,  Jersey  Shore,  PA   1 7740    Or,  call  1-600-213-5760 
or  (71 7)  494*1 0313.  We  provide  lour  payment  meitiods.  We  have  always  accepted  CO.D.  orders 
through  UPS.   Prepaid  orders  over  S50  are  shcpped  freight-tree  in  continental  U.S.  For  orders  under 
S50,  pfease  add  S3  tor  freight.  Orders  prepaid  by  a  certified  ctieck  or  money  order  are  shipped 
immediately.  Personal  and  company  checks  require  a  4  week  waiting  period  ptiot  to  shipping.  Visa 
and  Master  Carcf  orders  are  accepted  for  your  convenience,  but  we  cannot  pass  along  the  4%  discount 
offered  for  cash.  Prices  advertised  are  cash  prices.  Pufchasa  orders  are  accepted  irom  Educationaf 
Insututions.  We  only  chargo  sales  tax  on  items  delivered  tn  Pennsylvania.  For  APO,  FPO.  ar>d 
iniernational  orders,  please  add  S5  plus  3%  for  priority  mail-  Advertls&d  prices  and  availability  are 
subject  to  change.  Not  responsible  for  typographical  errors. 


icrofiics 


$1 64^5 


NX-1000 

Star's  answer  to  9  pin  dot  matrix  printers.  A  solt  touch  control  panel 
and  Star's  paper  park  feature  solves  your  mulli-document  needs.  144 
cps  draft  and  36  ops  NLQ  give  you  higti  resolution  9  pin  performance 
in  an  affordable  package  from  Star. 


Announcing  STAR'S  NX-1000  Printer  in  4  Models! 


NX-IOOOc 


With  a  Star  NX-t  OQOc  printer  your  printing  options  will 
n^ver  cease  to  amaze  you   The  Star  IVX-  lOOOc  has 
Btan<Jard  Commodore  serial  interface  for  64/t28 
computers.  Print  speed  is  selectable  at  144  cps 
(drati)  or  3G  cps  (NLQ)  and  papur  parking  will  lend 
versatrNty  to  your  document  handling  naEjd&    The  Star 
NX-tOOCX:  will  luJfiil  your  requirements  lo  Ihe  letter. 


$169 


95 


NX-1000  Rainbow 

The  Star  NX-iD0ORaint>ow  adds  a  whole  new 
<limensioo  to  your  work  llirough  muHl-color  printing. 
Slar  has  designed  20  printing  options  into  Ihis  printer. 
Add  to  this  paper  parhihgn  EpsD^■IB^t  emulation,  high 
resolulion  NLQ/graphlcs  for  a  prinier  with  extra  talent 
over  the  compeiition.  Star  s  NX^  t  QOO  Rainbow  does 
all  the  work. 


$217«5 


NX-IOOOc  Rainbow 

Slep  into  a  warU  Full  ol  color  Willi  ihg  SMr  NX-IOOOc 
Rainbow  printer.  Seven  color  phnhng  is  availatile 
along  with  the  same  standard  teaturoB  ot  all  Star  M!<' 
1000  printois.  Standard  Commodoro  serial  interface 
Is  included.  Enhance  your  Commodore  pioductlvlty 
with  tha  Star  NX-IOOQc  Rainbow. 


$225 


QC  DSOO 

^*'  DSHD 


COMMODORE 


COMMODORE    M  COMMODORE      £^ 


$25.95 

Je $28  95 

Leader  Bd $22.95 

irsos  1  or2aa.  $T1.95 

lotal  , $22.35 

fl $9.95 

irsss3 $11.95 

Board  Triple 

$T1.95 

$19.95 

K* $13.95 

3  0(1; 

icope ...S18.95 

choppar $18.95 

on: 

\i $19.95 

Magic $22.95 

w $19.95 

^fansion $19.95 

rnel   $19.95 

ne $19.95 

anlar $22.95 

langer S1995 

B $19.95 

-el $26.95 

wn $16.95 

Crachon $19.95 

.siedon $7.99 

J5l $7,9« 

a  lrvciu<l«<]: 

3lll.... $31.95 

3Publisfi«r $31. Sb 

i  Saflwoiks: 

•4 $29,85 

$35.95 

B... $39.95 

M2S $39  95 

TriPok S29  95 

54 $2995 

^ ...$29.95 

Z8 $39.95 

I $35.95 


Drive 
aintenance 


eCIflanar $7.9S 

Cleanar $10.95 


Printer 
terfaces 


$35.35 
pergraphics  ...JSS.gs; 
lid  $74.95- 

$29,95 

IWhii $32.95 

.uperG   ..        ,$44  95 
149,95 

rry  cables  for  moal 
ppricailons  for  many 
uiar  cornpuiers, 

■5 


i  St.  Writer $29.95 

PriraShop $26.M 

[Print  Shop  Compan  $20  95 
[GrnphrcLrb  1.2.3. ea  $1<i  95 
^arrrvan  Sart  Oiego. 

WotK) $19.95 

larmon  San  Dfago, 

jJSA  $22.95 

armen  San  Oiego, 

Eun^jo $22.95 

jGarridConatr  ...$17.95 
Star  Wars $17.95 

{parclsTalollI S25  9S 

■  MtiUor  Red  Odobsr    .$25.95 

$20,95 

•  Weol $20.95 

WasWano  $25  95 

Sa-dsTaie $25.95 

Bard's  Talo  II  $25.95 

Hish $25.95 


Unpiecedantea  speed,  powei, 
hjgh-end  tsalur&s  and  aasa  of 
USB  are  now  yours  with  ihese 
CKCTjptrortal  graphic  interlacos 
MLiC^  more  than  a  $ingro 
produd.  QEOS  12Sof<orsa 
diverse  range  o(  loalures  and 
applrcaEions 


GEOS  2.0  AvallaUa 


Surge 
Suppressors 


PP102-Soiiltel.,.. $16,95 

PP106-6outle1  with 

EML'RFI $28.95 

PPl04-6outlelwilh 

indicator $19.95 

PPIDI -6  outlet 

powerstrip $9.95 

Modem  Prolodor $10.95 


Printer 
Paper 


1  IX>0  sheet  laser , $i  6.95 

1 000  mailing  labels $6.95 

200  sheet  OKI  20 $8,95 

Banner  Paper  45'  Roll  .,  $10.95 
200  sheet  laser,.,. $6.95 


Caveman 

Ugh-Lympics $I9  95 

Death  Lord $19,95 

M>vsSaaa $22,95 

Jordan  vs  Bird  , $19.95 

Super  Bouldardash $9.95 

LofdsofConquest $9.95 

Modem  Wars $22.95 

Music  Conslruolion  Set  ..$9.95 

Powerplay  HocHey  $16.95 

Prnball  Conslfuclion $9.95 

Shateor  Die  ..., .$19.95 

YeagersAFT $22.95 

Risk $25,95 

Proiecl  FIreslan $19.95 

Fpyl:- 

Fasiload  $22,95 

Calitomla  Games  $22.95 

4i4  OH  Road  Racing  .,  SI  1  95 

Games:  Winter  Ed $22.95 

Games:  Summer  Ed $22.95 

Legend  of  Blacksllver  ..,$1 1  95 
Sporting  News 

Baseball  $22.95 

DiveEomtMr $1 1.95 

Death  Swofd  $16.9rj 

Final  Assault  $11  95 

lmpo5Sil>lo  Mission  2 ....  $1 1 .9 fi 

Melrocross $13.95 

Sit  Sppn  Basketball  ..,,$11,95 

Sir  Sport  Soccer $1t  95 

Tower  Toppler $22.95 

Space  Station  Oblivion  ,  $11.95 

Sir.  Sport  Footoall $17,95 

Sports  a  Roni $14.95 

a.itlleshlp $16,95 

LACrackctown $11.95 

Sub  Battle  SimulntO' $1 1,05 

Mindroll  ,.. $22.95 

Tochnooop $2295 

F.,-i;,:-,!td- 

iBIackLamp $il  95 

"Enlightenment     S1195 


Attentiicmv 
EduoalidnitJ 


MI(C-64)  ,  $29.95 

M  II  W'Dr.  Kolo  II 

(PCI $59,95 

Mlll(C-64)       $32  95 

Kralt  Mit^ro  Mouse 

(PCI $36.95 

C-1351  M0U59..  $38,95 

t 


XldBi: 

.$5.95        DSDO $4.95 

....$7.95        3.5 
$895        Monfll; 

SSOO  $11,50 

55  95        °SDD $17  95 

.$6-95  tlanus: 

SSOD $10  95 

...$6,95        °S°''-" •-*"3-«5 

,.$1395 


SSDD 
DSDO. 


SI295 


.,.$9,95 
..$13.09. 


Alcrolaao  Snseball $2295 

itlcvotaag.  Wrestling $16.9S 

68  Teniti  Disk $1195 

■jMOak   $1595 

aaiDwIi $14.95 

Vrestling  Match 

fpisK#1  $11.95 

iVfrestlng  Match 

|Di£k#2 S11.95 

Uirtwmo  Ranger $22.95 

teunshfp  $19.95 

[pirates  $22.95 

^tealiti  Fighlm $22.9S 

tpod  Stoim  Risinsi S22  95 

[f-15  SmkB  Engki  $22.95 

iSileni  Sorvite $2295 

Paperboy $13  S5 

Road  Runner $19  95 

Gaunlol S2095 

Captain  Blood S2095 

Alien  Syrtdrome $16  95 

Clubhouse  SporU $16  95 

Ouinin $19.95 

Polo  Position  II S14.95 

S(Wi:0  Horrwir    $16.95 

720     $19.95 

Autodue) $23.95 

UiiimalV $34.95 

Moebius $22  95 

Times  of  Lore S22.95 

Uliimal $22% 

Ul lima  III  .$22  95 

Ultima  V  $33  95 

S[.,:.i  ■       -■    ■ 

Football ...$9.B5 

Pure  Sial  Baseball $22.95 

Pure  Stat  Football $22.95 


Printer 
Ribbons 


NX-2400 $6.9S 

MX.  1000  BlatK $6.95 

NX- 1000  Color.. $9.95 

KX-PllOi 

(1081.  1091) $8,95 

Black  Okimaie $5.95 

Color  Okimala $6.95 

OKI  100  Series $7.95 

Sejkosha  SP  Series $9.95 

LX-KXWFX-aSO $695 

LO-SOO/SOO^SO $6.35 


Disc 
Storage 


Springboard: 

Newsroom $19.95 

Certificate  Maker $14.95 

StrgtDgic  Slmulnllons: 

Phanta»lelll $25.95 

Question  II $25.95 

Pool  ot  Radiance $25.95 

Dungeon  Master  Asst.  ..$19.95 

Eternal  Dagger $25.95 

Gettysburg $35.95 

Penier  Strike $25.95 

Typhoon  ol  Steal $29.95 

Waioama  Constr $19.95 

Sublogic: 

Flight  Simulator  II $30.95 

Stealth  Mission $30.95 

Jot  S23.95 

Individual  Scenery 

Diskfl  .#6 $14.95 

Individual  Scenery 

Disk  »7  or  mi   $17,95 

Scenory  Disk  Japan $17.95 

Scenery  Disk  San 

Francisco..  $17.95 

Scenory  Disk  Western 
Europe $17,95 

TJni«works; 

Swl(tcalc12a $27.95 

Word  writer  3 $22.95 

Data  Manager  2  -  64  ..,.$11.95 

Oata  Manager  128 $26,95 

Parmer  64 $22,95 

Partner  128 „.... $26.95 

Swillcnk:  w/Sideways 

54  *^^  Qg 

Word  WtHer  128  .'....."....%n!ii> 
Geos  Writer  64 $22,95 

An  Gnllety  1  and  2.,aa  .$17.95 

Print  Master $17.95 

An  Gallery  Fantasy $13.95 

I8W  Titles  Amt«Dte  tor  PCi 


Switch 
Boxes 


Cent  •25' AB $39.95 

Canl-3S'Aa $39.95 

RS232  ABC $45.95 

Cent  ABC $49.95 

'RS232ABCD S49.9S 

Cent  AHCD .  54%  95 


QVS-10S1W  $3.95 

OVS-75  51M  $10.95 

QVS-40  31/2 $9.95 


Tac3 $9.95 

Tac2 , „ $10.95 

TacS $12.95 

Toct  +  IBM/AP $26.95 

Silk  Stick.. $6.95 

Black  Max.. $10.95 

Boss _ $11.99 

away $1999 

Suthandie $16.75 

Winner  909., $24,95 


IBM/AP. $2M 

Kr.-iliKCIIIAP.'PC $16.95 

k/ail  PC  Joystick 

Card        S24.95 

Ihritit  Maie  Master   $8.95 

ttConirolior S13.9S 

fEpyi  500  XJ  AT,W  $13.95 

pjjyii  500  XJ  PC'AP  .,,$22.95 

rWico  Ergoslick $14.95, 

iPowerplay  Joystick $16.5 


FREE  SHIPPING  ON  PREPAID  CASH  ORDERS  OVER  $50  IN  CONTINENTAL  U.S. 


Editor  Command  Sammanr 

0-9 

Set  cursor  speed 

f3 

Select  pen  1 

a 

Select  pen  2 

(7 

Select  pen  3 

(\ 

Highlight  null  characters 

L 1  KL/Commodore  0-9 

Change  active  pen  color 

U 

Shift  image  one  character  up 

D 

Shift  image  one  character  down 

L 

Shift  image  one  character  left 

R 

Shift  image  one  character  right 

F 

Flip  image  horizontally 

C 

Garbage  colEection  (also  clears  buffers) 

B 

Increment  background  color 

G 

Increment  grid  color 

S 

Increment  sprite  color 

M 

Toggle  between  hi-res  and  multicolor  mode 

I 

Copy  image  to  buffer 

0 

Copy  image  from  buffer  to  current  frame 

t 

Copy  current  character  into  minibuffer 

• 

Copy  character  from  minibuffer  to  current  character 

CLR/HOME 

Moves  the  cursor  to  the  top  left  comer 

SHIFT-U 

Shift  image  one  pixel  up 

SHIFT-D 

Shift  image  one  pixel  down 

SHIFT-L 

Shift  image  one  pixel  left 

SHIFT-R 

Shift  image  one  pixel  right 

SHIFT-F 

Flip  image  vertically 

SHtFT-B 

Decrement  background  color 

SHIFT-G 

Decrement  grid  color 

SHIFT-S 

Decrement  sprite  color 

SHIFT-CLR/HOME 

Erase  current  image 

INST/DEL 

Delete  current  frame 

SHIFT-INST/DEL 

Insert  new  frame 

£ 

Null  current  character 

SPACE  BAR 

Clear  current  character 

+ 

Move  to  next  frame 

— 

Move  to  previous  frame 

N 

Jump  to  selected  frame 

RUN/STOP 

Exit  to  BASIC 

NEW  BASIC  COMMANDS 

STAMP  n.x,y 

Draws  an  image  on  the  screen 

ERASE  n,x,y 

Erases  an  image  on  the  screen 

DLDAD  "filename" 

Loads  an  image  file  from  disk 

DSAVE  '■filename- 

Saves  an  image  file  to  disk 

CLEAR 

Erases  images  from  memory 

MULTIC  mcl.mcl 

Sets  the  multicolor  pen  colors 

characters  are  displayed  with  a 
checkerboard  pattern,  while  empty 
characters  appear  as  spaces.  Press  C 
to  remove  empty  characters;  then 
press  fl  to  return  to  the  normal 
display. 

Animation 

To  animate  your  shapes,  you'll 
need  to  create  an  image,  copy  it  to 
the  next  frame,  make  changes  to  it, 
copy  the  new  image  to  the  next 
frame,  and  so  on.  This  is  a  difficult 
task  to  do  by  hand.  Fortunately, 
CHR$  Graphics  handles  most  of 
the  work  for  you. 

To  move  to  the  next  frame, 
press  the  +  key.  The  —  key  moves 
you  to  the  previous  frame.  To  move 
quickly  to  distant  frames,  press  N. 
CHR$  Graphics  prompts  you  for  a 
frame  number.  Type  in  the  frame 
number.  Notice  how  the  frame 


number's  digits  rotate  right  to  left. 
CHR$  Graphics  always  displays 
the  frame  that  corresponds  to  this 
number.  For  example,  let's  say 
you're  viewing  frame  216  and  wish 
to  move  to  frame  67,  Press  N  and 
begin  entering  the  numbers  6  and 
7.  As  you  enter  the  numbers,  CHR$ 
Graphics  briefly  displays  frame  166 
and  then  frame  67,  Press  a  non* 
numeric  key,  such  as  RETURN, 
when  you're  satisfied  with  the  cur- 
rent frame. 

Copying  the  image  to  another 
frame  is  done  by  using  a  buffer.  The 
buffer  is  just  a  temporary  storage 
place  for  an  image  while  you  move 
to  another  frame.  To  copy  an  image 
to  the  buffer,  press  I.  To  retrieve  an 
image  from  the  buffer,  press  O.  For 
example,  to  copy  an  image  from 
frame  5  to  frame  6,  move  the  cursor 
to  frame  5.  Press  I  to  store  the  image 


to  the  buffer;  then  press  the  +  key 
to  move  to  frame  6.  Press  O  to  re- 
trieve the  image  from  the  buffer 
and  then  store  it  in  frame  6. 

In  addition  to  the  image  buffer, 
CHR$  Graphics  has  a  smaller  char- 
acter buffer.  Press  t  to  save  the 
character  the  cursor  is  in  to  the 
character  buffer.  The  contents  of 
the  character  buffer  is  displayed 
over  the  top  left  comer  of  the  im- 
age. Press  •  to  copy  the  character 
from  the  character  buffer  to  the 
character  the  cursor  is  in. 

Note  that  both  the  image  and 
character  buffers  are  cleared  when 
garbage  collection  occurs.  Also, 
when  using  the  buffer,  be  careful 
not  to  copy  part  of  a  multicolor 
frame  into  a  high-resolution  frame. 
This  would  confuse  the  program. 

To  test  your  animation,  hold 
down  the  +  or  —  key  to  quickly 
flip  through  each  frame.  This 
should  give  you  a  good  idea  of 
what  the  animation  will  look  like  in 
a  program. 

Erasing  the  Image 

CHRS  Graphics  provides  a  variety 
of  commands  for  erasing,  deledng, 
and  inserting  images.  Press  £  to 
erase  the  character  the  cursor  is  in. 
Press  the  space  bar  to  copy  a  space 
to  the  character  the  cursor  is  in. 
(Spaces  may  be  useful  later  when 
you  use  your  image  within  a  pro- 
gram. Unlike  null  characters, 
spaces  are  actually  copied  to  the 
screen  by  CHR$  Graphics'  STAMP 
command,  discussed  later.  This 
way,  spaces  help  erase  whatever 
was  previously  on  the  screen.) 

Press  SHIFT-CLR/HOME  to 
erase  the  current  image  and  leave  it 
blank.  If  you  want  to  get  rid  of  the 
image  frame  altogether,  press  DEL. 
This  deletes  the  current  frame  and 
renumbers  the  rest  of  the  frames  to 
fill  the  gap  left  by  the  deleted 
frame.  To  insert  a  new  frame,  press 
SHIFT-INST/DEL.  The  other 
frames  are  renumbered  to  make 
room  for  the  new  frame.  Use  this 
command  with  care,  because  the 
image  in  frame  255  will  be  lost. 

Errors 

In  addition  to  the  OUT  OF  CHRS 
error  mentioned  previously,  you 
may  also  get  an  OUT  OF  MEMORY 
error  if  there  is  no  more  room  in 
CHR$  Graphics'  internal  storage 
area  to  add  another  frame.  If  you 
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get  this  error,  you'll  have  to  delete  a 
frame  or  press  RUN/STOP  to  re- 
turn to  BASIC.  With  over  15,000 
bytes  of  available  memory,  OUT 
OF  MEMORY  errors  are  rare. 

Press  RUN/STOP  to  return  to 
BASIC.  Don't  panic  if  you  can't  see 
the  cursor!  You  may  have  redefined 
one  of  the  reversed  characters  used 
to  display  the  cursor  when  you  de- 
signed a  frame.  It's  a  good  idea  to 
press  C  to  force  garbage  collection 
before  leaving  the  editor.  This  will 
make  the  invisible-cursor  problem 
less  frequent. 

BASIC  Cammands 

Once  your  images  have  been  creat- 
ed, you're  ready  to  use  them  in  your 
programs.  CHR$  Graphics  adds  six 
BASIC  commands  to  make  this  easy. 
The  command  STAMP  n,x,}f 
draws  an  image  on  the  screen, 
where  n  is  the  image's  frame  num- 
ber, r  is  the  column  number  (0-39) 
of  the  upper  left  comer  of  the  im- 
age, and  y  is  the  row  number  (0-24) 
of  the  upper  left  comer  of  the  im- 
age. If  you  use  coordinates  outside 
the  legal  ranges,  CHR$  Graphics  ig- 
nores that  command.  While  testing 
your  images,  use  the  command 
STAMP  n,0,0  to  make  sure  that 


your  image  appears  on  the  screen. 

The  command  to  erase  an  im- 
age from  the  screen  is  ERASE 
n,x,t/.  As  with  the  STAMP  com- 
mand, n  is  the  image's  frame  num- 
ber, X  is  its  column  position,  and  y  is 
its  row  position.  The  image  is 
erased  by  stamping  spaces  over  it. 

The  DSAVE  command  saves 
your  image  definitions.  Its  format  is 
DSAVE  "filename",  where  filename 
is  the  name  of  the  file  the  definitions 
will  be  saved  to.  The  command  to 
load  an  image-definition  file  from 
disk  is  DLOAD.  Its  format  is 
DLOAD  "filename',  where  filename 
is  the  name  of  the  image-definition 
file  to  load. 

The  CLEAR  command  discards 
all  image  definitions.  Use  it  only 
when  you've  saved  the  definidons 
or  when  you  want  to  start  over.  Im- 
ages cannot  be  "unClEARed." 

The  last  command  CHR$ 
Graphics  adds  to  BASIC  is  the 
MULTIC  command.  MULTIC  sets 
background  colors  1  and  2  for 
multicolor  mode.  Its  syntax  is 
MULTIC  mcl,mc2,  where  mcl  is 
background  color  1  and  mc2  is 
background  color  2. 

Examine  CHR$  Graphics' 
demo  program,  Program  i,  to  see 


how  many  of  these  commands  may 
be  put  to  use. 

Hints  and  Tips 

CHRS  Graphics  is  limited  to  using 
196  redefined  characters.  Occasion- 
ally, you  may  need  more  than  this. 
For  example,  you  may  be  working 
on  a  game  with  many  animated 
characters  and  levels.  This  problem 
can  be  solved  by  creating  a  different 
character  set  for  each  level  of  the 
game.  Since  a  CHRS  Graphics  file  is 
relatively  small,  a  new  character  set 
can  be  quickly  loaded  using  the 
DLOAD  command. 

By  default,  CHR$  Graphics 
works  in  multicolor  mode,  which 
allows  you  to  use  both  hi-res  and 
muldcolor  graphics;  the  only  price 
you  pay  is  that  instead  of  having  16 
colors  available,  you  have  8.  If 
you'd  prefer  to  work  in  hi-res  mode 
exclusively  so  you  can  access  all  16 
of  the  64's  colors,  load  CHR$ 
Graphics  and  enter  this  line: 
POKE  2210,200 

Now  when  you  type  SYS  31744, 
you'll  have  access  to  all  16  colors, 
but  the  f3,  f5,  (7,  and  M  keys  will  be 
disabled. 

See  program  listings  on  page  76.     G 


DUST  COVERS 


satisfaction  GLiaranteed 


Covers  To  Your 

•  Custom  Made 

DImeiisions  For 

•  Heavy  32  oz.  vinyl 

•  Colors;  Tan  or  Brown 

All  Types  of 

•  Quantity  Discxjunts  Available 

Equipment 

COMPUTEflS 

DISK  DRIVES 

C-64                             S  8.00 

C-1541/C 

$8,00 

C-64C                             10.00 

C-1571 

8.00 

C-12e                               13.00 

C-1581 

8,00 

C-12BDCPU                     13.00 

AMIGA  3.S 

8,00 

C-128DKEYB'D                  8.00 

ENHANCER2000 

8,00 

AMIGA  500                      13.00 

FSD-1,  -2 

8,00 

PC-10  CPU                        13,00 

C-154MI 

8.00 

PC-10  KEYBD                    8.00 

PRINTERS 

MONITORS 

(All  Makes) 

C-1702                           SI  6.00 

Dot  Matrix  10' 

C-1802/CM14t                 19.00 

Carriage 

SI  3.00 

C-1902/AMIGA                 19.00 

Dot  Matrix  15" 

C1902A/MAG40                 19.00 

Carriage 

S16.00 

C-10B4                               19.D0 

VCR'8 

C-2001,2                            19,00 

VCR's 

SI, 3  00 

CM-8762                          19.00 
CM-1B02A/8502                 19,00 

(Dimensions  of  VCR  and  clock 
cut  out  required,) 

SEND  DIMENSIONS  FOR  QUOTES 

ON  COVERS  N01 

r  USTED 

Order  by  stating  make,  model  &  color  choice  Tan  or  Brown  witti  check  or 
M.O.  plus  $2.00  per  item  ($5  00  max )  ship.  &  handl.  CA  res.  add  6%  tax, 
CODs  $3.00, 

CROWN  CUSTOM  COVERS 

Dept  CG-7,  24621  Paiga  Circle 
Laguna  HiBs,  CA  92653     (714)  472-6362 


NEW 
V6.0 


ULTRABYTE 

DISK 

NIBBLER 


NIBBLE  COPIER  WITH  305  PARAMETERS 
FOR  COMMODORE  64  AND  128 

•  Copies  most  protected  disks  in  2  minutes  without 
need  for  parameters  Including  rapid-locked 

•  305  parameters  to  make  unprotected  copies  of  recent 
programs  Including  VMAX  protection.  100  more  than 
v5,0.  Send  stamped  envelope  for  list 

•  Copies  up  to  40  tracks  using  1  or  2  1541  or  1571 
drives.  Copies  both  sides  on  1571 

•  Copies  Itself  (for  this  reason,  no  refunds  given) 


V6.0    $29.95  PLUS  $4.00  SHIPPING 


1,  Disk  Surgeon  V2,0-- new  disk  utility S10.C0 

2.  Ullramai)  --  mail  list  and  labels \  both  for 

Handy-Capper  '•  race  handicapper j    S10,00 

3.  McMurptiy's  Mansion  ■-  text  adventure .      .  i   both  for 
Soluware  -  solutions  to  10  adventures.  .    .  j     SI 0.00 

4,  tSOolderparameters  and  file  copier 510,00 

Add  $4.00  shipping  (covers  up  to  5  items) 

Mastercard,  Visa,  Check  or  M,0.,  Calif,  add  6.5%  (St.65)  sates  tax. 
Foreign  ordersfCOD  add  £2,00,  PaymenI  must  be  In  U,S.  funds 

UPDATES  ■  V6.0  is  same  as  V5.0  but  with  100  new  parameters. 
Return  original  Ultrabyte  parameter  disk  with  SIS.OO  plus  $4,00 
shipping.  Foreign  add  $2,00,  No  exceptions. 

To  order,  write  or  call  24  hr,  order  line.  For  Info,  write, 

ULTRABYTE  (818)  796-0576 
P.O.  Box  789  LaCanada,  CA  91011  USA 


>. 


In  the  last  ten  years,  the  world  of 
personal  finance  has  become  in- 
creasingly complex.  Almost  daily, 
you  face  tough  financial  questions: 
How  much  of  your  paycheck 
should  you  save?  Should  you  buy  or 
lease  a  car?  How  much  can  you  af- 
ford in  monthly  payments  for  a 
new  car?  How  much  life  insurance 
should  you  carry?  Are  you  saving 
enough  for  your  children's  college 
education?  What  kind  of  mort- 
gage— fixed  or  adjustable  rate — is 
right  for  you?  Should  you  refinance 
your  mortgage?  Should  you  deposit 
money  in  an  IRA  this  year? 

Questions  like  these  often  re- 
quire the  opinion  of  an  expert. 
However,  with  "Financial  Plan- 
ner," you  may  be  able  to  get  some 
answers  without  having  to  consult 
a  financial  analyst.  Not  only  does 
this  comprehensive  program  per- 
form a  variety  of  common  financial 
calculations,  but  it  also  features  a 
built-in  calculator  for  quick  figuring 
or  for  what-if  projections. 

Getting  Starteii 

Financial  Planner  is  written  entirely 
in  BASIC,  so  be  sure  to  use  "The 
Automatic  Proofreader,"  found 
elsewhere  in  this  issue,  when  typ- 
ing it  in.  Although  the  program  is 
fairly  long — just  over  21K — it's  di- 
vided into  modules  so  that  you  can 
type  in  only  the  parts  you  need.  The 
only  requirement  is  that  you  in- 
clude lines  10-1950,  which  contain 
the  main  menu,  the  built-in  calcula- 
tor, and  some  common  subroutines. 
When  you  run  the  program,  a 
menu  of  eight  options  appears;  each 
option  has  its  own  module.  To  help 
you  determine  which  modules  to 
type  in,  an  overview  of  each  is  pre- 
sented below.  If  you  read  the  de- 
scription of  a  module  and  then 
decide  you  don't  need  it,  replace  the 
first  line  of  the  module  (which  reads 
REM—)  with  the  line  GOTO  400. 


Need  some  help 

sorting  out  your 

finances?  This 

versatile  and  powerful 

program  for  the  64 

may  provide  the 

answers  you've  been 

looking  for. 


For  example,  suppose  you're 
not  interested  in  the  College  Plan- 
ning module  (lines  2000-2999).  To 
prevent  it  from  being  accessed  from 
the  menu,  enter  line  2000  as 
2000  GOTO  400 

Then  continue  typing  with  the  next 
module.  The  line  numbers  are  list- 
ed as  x000-x999  to  help  the  user  re- 
member them.  The  actual  line 
numbers  will  be  different.  For  ex- 
ample, the  College  Planning  mod- 
ule actually  runs  from  2000  to  2340. 
Following  are  the  eight  menu 
options  offered  by  the  program. 

1.  College  Planning  (lines  2000- 
2999).  Calculates  the  amount  you 
need  to  save  each  year  to  pay  for 
your  child's  education.  Also  deter- 
mines the  total  amount  you  could 
set  aside  today  to  pay  for  the  future 
cost  of  college. 

2.  Car  Buy/Lease  (lines  3000- 
3999).  Determines  how  much  it 
really  costs  you  to  finance  or  lease  a 
car  over  the  same  period.  Also 
helps  you  compare  a  rebate  to  a 
lower  finance  rate.  Outputs  total 
costs  and  real  costs  adjusted  for  in- 
flation. Displays  the  monthly  pay- 
ment when  you  finance. 

3.  Compound  Interest/Savings 

(lines  4000-4999).  Helps  you  plan 
your  savings.  Determines  how  long 
and  how  much  you  have  to  save 
each  month  to  have  enough  for  that 
trip  to  Europe.  Calculates  any  one 
of  five  variables  (present  value, 
monthly  addition,  annual  yield. 
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number  of  years,  and  future  value) 
when  you  enter  the  other  four. 

4.  Loan  Payments  (lines  5000- 
5999),  Lets  you  figure  out  whether 
you  can  afford  a  new  car.  Apartment 
dwellers  can  see  how  much  house 
they  can  buy  with  the  money  cur- 
rently going  toward  rent.  Helps  you 
identify  any  hidden  charges  (like  life 
insurance)  tagged  onto  a  prospective 
loan.  Calculates  any  one  of  four 
variables  (amount  borrowed,  inter- 
est rate,  number  of  monthly  pay- 
ments, and  monthly  payment) 
when  given  the  other  three. 

5.  Fixed/Adjustable  Rate  Mort- 
gage (lines  6000-6999),  Designed 
for  home  buyers,  this  module  helps 
you  decide  which  type  of  mortgage 
is  right  for  you.  Adjustable  rate 
mortgages,  or  ARMs,  usually  start 
with  a  lower  rate,  but  can  end  up 
costing  more  in  the  long  run  if  rates 
rise.  Calculates  payments  and  break- 
even times  using  two  scenarios. 

6.  Life  Insurance  Needs  (lines 
7000-7999),  Financial  Planner  takes 
into  account  a  number  of  factors  (see 
below)  and  suggests  a  policy  (term, 
universal,  or  whole)  based  on  your 
age,  income,  and  savings. 

7.  Refinancing  Your  Mortgage 

(lines  8000-8999).  Many  houses 
were  purchased  when  mortgage 
rates  were  12  or  13  percent.  This  rou- 
tine checks  to  see  whether  interest 
rates  have  come  down  far  enough  to 
refinance.  It  calculates  the  cost  and 
break-even  time  (how  long  you  must 
keep  your  house)  before  it  makes 
sense  (is  profitable)  to  refinance. 

8.  IRA  Planning  (lines  9000-9999). 
Financial  Planner  compares  a  sav- 
ings program  in  an  IRA  to  a  nonshel- 
tered  savings  account,  it  helps  you 
decide,  on  this  basis,  whether  to  con- 
tribute to  your  IRA  this  year.  For 
most  people,  the  answer  is  a  defini- 
tive Yes,  but  what  if  you  need  the 
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money  to  buy  a  house  or  pay  for  tu- 
ition in  five  years?  This  routine  calcu- 
lates how  long  it  takes  before  early 
withdrawals  (considered  along  ^vith 
the  penalty  and  taxes)  are  feasible. 

Some  General  Considerations 

Run  the  program  and  select  one  of 
the  eight  options.  (Remember,  any 
option  you've  omitted  won't  func- 
tion.) A  screen  will  appear  with  a  list 
of  variables  and  their  default  values. 
To  change  the  value  of  a  particular 
variable,  move  from  one  input  field 
to  another  using  the  cursor-up  and 
cursor-douTi  keys.  The  current  input 
field  is  shown  in  inverse.  When 
you've  reached  the  variable  you  wish 
to  change,  enter  a  new  number  and 
press  RETURN.  If  you  need  to  clear 
an  input  field,  press  the  space  bar  or 
the  CLR/HOME  key. 

Each  module  works  in  a  similar 
manner;  enter  your  values  or  use  the 
defaults,  and  then  press  fl  to  per- 
form the  calculation.  After  the  result 
is  displayed,  press  f  1  to  enter  another 
set  of  values,  f3  to  print  the  screen,  or 
♦-  (back  arrow)  to  return  to  the  main 
menu.  Press  *-  from  the  menu  to  exit 
the  program. 

As  noted,  Financial  Planner 
comes  with  a  built-in  calculator.  To 
access  it  from  the  main  menu  or  from 
within  a  module,  press  C.  Then  type 
in  a  formula,  such  as  4000*. 075 
(4000  times  .075).  To  edit  your  entry, 
use  the  DEL  key.  (Note  that  the  cur- 
sor keys  do  not  function  in  this 
mode.)  When  you've  entered  your 
formula,  press  RETURN  to  execute 
the  calculation  and  display  the  result. 
Then  press  C  or  -  to  exit  the  calcula- 
tor. (You  can  also  exit  the  calculator 
by  pressing  =;  this  causes  the  cur- 
rent equation  and  result  to  be  dis- 
played at  the  top  of  the  saeen.) 

Interest  and  inflation  rates  fluc- 
tuate; there  is  no  way  to  know  what 
future  rates  will  be,  The  default  rates 
used  in  the  program  are  up-to-date 
as  of  this  writing  (March  1989).  USA 
Today  and  Money  Magazine  publish 
current  interest  and  inflation  rates. 
To  find  out  what  rates  of  interest 
banks  are  charging,  look  in  the  busi- 
ness section  of  your  local  newspaper. 

The  annual  rate  of  inflation  is  a 
factor  in  several  modules.  Typical- 
ly, the  Consumer  Price  Index  (CPI) 
is  used  to  measure  the  overall  rate 
of  inflation.  For  each  of  the  past  two 
years,  the  Consumer  Price  Index 
has  risen  by  4.4  percent.  However, 
certain  prices — such  as  those  for 
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college  tuition — have  been  rising 
faster.  You  may  wish  to  take  this 
into  consideration  with  option  1 
(College  Planning). 

Since  Financial  Planner  uses 
BASIC  2.0  math  routines  in  its  cal- 
culations, results  may  sometimes 
be  off  by  a  few  cents.  For  this  rea- 
son, program  input  is  limited  to 
whole  dollar  amounts. 

Although  Financial  Planner 
has  endured  extensive  testing,  we 
don't  recommend  you  make  any  fi- 
nal decisions  based  on  this  program 
alone.  Instead,  use  the  results  it 
provides  as  a  guide. 

Let's  now  discuss  the  individ- 
ual input  variables  used  in  each 
module  and  how  to  interpret  the 
program's  output. 

College  Planning 

Today's  annual  cost.  According  to 
the  Wall  Street  journal,  annual  ex- 
penses for  private  colleges  are 
about  $11,500  a  year;  this  includes 
room,  board,  tuition,  and  books. 
State  colleges  cost  about  $4,500  a 
year  for  an  in -state  student.  How- 
ever, if  you're  considering  an  Ivy 
League  school,  current  costs  are 
about  $17,500  a  year. 

Inflation  rate.  The  inflation  rate  for 
college  costs  has  run  about  7  per- 
cent over  the  last  two  years.  But  in- 
flation has  a  way  of  leveling  out,  so 
the  default  rate  of  4.4  percent  is  not 
unrealistic. 

Years  until  college.  Many  children 
enter  college  at  the  age  of  18.  Thus, 
if  your  child  is  7  years  old,  enter  1 1 
on  this  line. 

#  years  in  college.  Typical  choices 
are  4,  2,  or  6. 

Present  savings.  This  is  how  much 
you've  saved  specifically  for  col- 
lege; don't  include  money  saved  for 
other  things. 

After  tax  yield.  This  is  the  rate  of 
interest  your  money's  earning  after 
taxes.  Interest  rates  are  impossible 
to  predict,  so  we  use  a  current  rate. 
The  default  rate  of  7.35  percent  is 
the  yield  that  U.S.  Savings  Bonds 
are  currently  paying. 

Beginning  in  1990,  interest  on 
newly  purchased  savings  bonds 
will  be  tax-exempt  if  the  redeemed 
bonds  are  used  to  pay  for  tuition 
and  your  income  is  less  than 
$90,000  a  year.  Savings  bonds  are 
available  at  major  banks  and  can  be 


purchased  in  $25  units.  If  you  do 
use  savings  bonds,  count  the  cost  of 
the  bond,  not  its  face  value  (a  $100 
bond  costs  you  $50)  toward  the 
amount  you  need  to  save  each  year. 
If  you  do  not  go  the  savings 
bond  route,  use  Financial  Planner's 
built-in  calculator  to  figure  out  the 
after-tax  yield.  For  example,  you've 
put  the  money  into  5-year  CDs  (cer- 
tificates of  deposit)  yielding  9  per- 
cent and  you're  in  the  28-percent  tax 
bracket.  Press  C  to  acdvate  the  cal- 
culator. Now,  enter  1-28/100.  The 
calculator  displays  .72  as  the  result. 
Continue  by  entering  *9  to  muldply 
by  9.  You'll  see  that  the  after-tax 
yield  is  6.48.  Press  =  to  exit  the  cal- 
culator; then  type  in  the  value. 

Output.  Recommends  how  much 
to  save  each  year  to  meet  your  goal. 
Several  colleges  are  offering  pre- 
payment plans,  where  you  deposit 
money  with  them  today  to  pay  for 
tuition  when  your  child  reaches 
college  age.  See  how  the  results 
from  Financial  Planner  compare 
with  these  plans. 

Car  Buy /Lease 

Buying  a  car  usually  requires  more 
up-front  money  and  higher  month- 
ly payments,  but  is  cheaper  in  the 
long  run  than  leasing.  Leasing  re- 
quires a  big  payment  at  termination 
to  buy  the  car.  If  you  don't  have 
money  for  a  down  payment  or  can't 
afford  a  higher  monthly  payment, 
leasing  may  be  the  way  to  go.  And 
Financial  Planner  tells  you  just  how 
much  leasing  that  dream  car  will 
cost  you. 

When  you  purchase  a  car, 
many  promotions  give  the  choice  of 
a  cash  rebate  or  a  lower  finance 
rate.  By  changing  the  finance  terms 
and  ignoring  the  lease  portion  of 
this  module,  you  can  compare  the 
real  costs  of  each. 

Inflation  rate.  Again,  the  default 
rate  is  4.4  percent  (see  previous 
option). 

BUY 

Price  of  car.  Cash  price  for  the  car 
you  want  to  buy. 

Financing.  Can  be  Yes  or  No.  If  you 
select  No,  the  next  three  lines  are  ig- 
nored so  that  the  total  and  real  costs 
are  simply  the  price  paid. 

Trade-in/down  payment.  How 
much  the  dealer  gives  you  for  your 
old  car  and/or  the  amount  of  cash 


you  put  down. 

Annual  %  rate.  Auto  loans  from 
banks  on  new  cars  run  about  12 
percent.  Rates  on  used  cars  are 
often  higher;  13.9  percent  or  even 
16  percent  is  not  uncommon.  Car 
dealers  often  offer  special  promo- 
tions with  lower  rates  or  a  cash 
rebate, 

#  of  monthly  payments.  How 
much  time  it  will  take  you  to  pay  off 
the  loan.  Loans  on  new  cars  usually 
run  48  or  60  months.  Loans  on  used 
cars  are  typically  30  or  36  months. 

LEASE 

Refundable  security  deposit.  This 
is  returned  to  you  at  the  expiration 
of  the  lease,  but  all  that  time  erodes 
the  value  of  your  money. 

Initial  payment.  The  amount  you 
pay  before  you  get  the  keys,  which 
is  not  refunded.  Many  leases  call  for 
first  and  last  payments  to  be  made 
at  the  beginning  of  the  lease.  If  this 
is  the  case,  include  the  last  payment 
here  and  subtract  one  month  from 
the  length  of  the  lease  (#  of  pay- 
ments, below). 

Monthly  payment.  What  you  pay 
each  month,  rounded  off  to  the 
nearest  dollar. 

#  of  payments.  Leases  usually  run 

48  or  60  months.  Remember  to  sub- 
tract 1  if  the  last  payment  is  made  at 
the  start  of  the  lease. 

Buy  out  price.  At  the  end  of  the 

lease,  you  have  the  option  to  buy 
the  car.  To  make  the  comparison 
with  owning  a  car  valid,  Financial 
Planner  assumes  you  buy  the 
leased  car. 

Output.  The  total  of  all  costs  for 
buying  and  leasing  are  displayed 
along  with  the  totals  adjusted  for 
inflation.  The  monthly  payment  for 
financing  is  also  shown. 

CompQund  Interest/Savings 

This  module  is  a  little  different.  It 
calculates  any  one  of  five  variables 
when  you  provide  the  other  four. 
Be  sure  you  move  the  cursor  to  the 
value  you  want  to  calculate. 

Present  value.  The  amount  that's 
presently  in  your  account. 

Monthly  addition.  How  much  you 

plan  to  deposit  each  month. 

Annual  yield.  The  default  rate  is 
what  banks  currently  pay  on  mon- 
ey market  accounts.  This  rate 


changes  often;  it  was  below  6  per- 
cent a  year  ago, 

#  of  years.  How  long  you  plan  to 
make  the  monthly  addition. 

Future  value.  Your  account  bal- 
ance after  all  deposits  have  been 
made. 

Output.  Reported  in  terms  of  one 
of  the  five  variables. 

Loan  Payments 

Much  like  the  previous  module, 
this  one  calculates  any  one  of  four 
variables  when  you  provide  the 
other  three.  Renters  can  see  how 
much  mortgage  they  can  afford 
based  on  their  rent.  For  example,  to 
do  this  for  a  30-year  mortgage,  en- 
ter monthly  rent  as  the  Monthly 
payment,  360  for  #  of  monthly  pay- 
ments, and  the  current  mortgage 
rate  for  Interest  rate.  Then  move  the 
cursor  up  to  Amount  of  loan  and 
press  fl. 

To  print  out  a  loan  payment 
schedule,  press  f5  and  enter  the 
starting  date  for  the  loan.  This 
printout  gives  you  the  outstanding 
balance  of  the  loan  for  any  date.  It 
also  shows  how  much  of  each  pay- 
ment goes  toward  principal  and 
how  much  is  for  interest. 

Amount  of  loan.  How  much  do 

you  want  to  borrow? 

Interest  rate.  Prevailing  rates  on 
home  equity  loans  are  about  11,5 
percent;  rates  for  unsecured  per- 
sonal loans  are  closer  to  18  percent. 

#  of  monthly  payments.  How  long 
before  you  pay  off  the  loan? 

Monthly  payment.  Amount  of 
each  payment.  This  is  what  most 
people  want  to  calculate. 

Output.  Reported  in  terms  of  one 
of  the  four  variables. 

Fixed /Adiustatile  Rate  Mortgage 

For  most  of  us,  this  can  be  a  very 
complex  and  confusing  subject. 
Fixed  rate  mortgages  have  been 
around  for  many  years  and  are  the 
most  popular.  Adjustable  rate 
mortgages  (ARMs)  are  relatively 
new.  Their  rate  of  interest  is  tied  to 
a  benchmark  rate  like  the  prime  or 
the  five-year  Treasury  bill  rate.  If 
interest  rates  go  up  or  down,  so  do 
your  payments. 

In  general,  ARMs  are  good 
when  you  sell  quickly  or  interest 
rates  go  down,  ARMs  usually  start 
with  a  lower  interest  rate,  but  can 


end  up  costing  much  more  than  a 
comparable  fixed  rate  mortgage  if 
interest  rates  go  up.  Some  ARMs 
have  an  artificially  low  rate  the  first 
year.  If  you  are  considering  an 
ARM,  take  a  good  look  at  the  worst- 
case  scenario.  If  the  payments  make 
you  shudder,  you  may  want  to  stick 
with  a  fixed  rate  mortgage. 

Principal.  This  is  the  amount  you 
want  to  borrow.  The  average  price 
of  a  house  nationwide  is  $115,000. 

Points,  A  percentage  of  the  princi- 
pal, paid  when  you  initiate  the 
mortgage, 

FIXED  RATE  MORTGAGE 

Annual  %  rate.  Rates  today  are 
about  10,86  percent  for  a  30-year 
mortgage  and  10.68  percent  on  a 
15-year  mortgage, 

#  of  years.  Thirty-year  mortgages 
are  very  popular,  as  are  those  with 
15-year  terms, 

ADJUSTABLE  RATE 
MORTGAGE 

Initial  interest  rate.  The  rate  for 
the  first  year  of  the  mortgage. 

Yearly  cap.  The  maximum  amount 
the  interest  rate  can  increase  in  one 
year;  most  ARMs  have  a  2-percent 
yearly  cap. 

Lifetime  cap.  The  highest  the  rate 
can  be  over  the  life  of  the  mortgage. 
Fourteen  percent  is  the  most  com- 
mon cap. 

#  of  years.  For  the  sake  of  compari- 
son, this  should  be  the  same  as  the 
length  of  time  for  the  fixed  rate 
mortgage. 

Output.  After  you've  read  the  re- 
sults, press  f5  for  more  analysis. 
The  initial  results  include  monthly 
payments  for  each  type  of  mort- 
gage. Financial  Planner  does  not 
handle  biweekly  payments  or  other 
alternative  payment  schedules. 

Two  different  scenarios  are 
used  to  figure  out  future  payments 
on  the  ARM.  The  first  has  interest 
rates  rising  0,5  percent  a  year.  The 
second  is  the  worst-case  scenario, 
with  rates  going  up  the  maximum 
each  year  until  the  lifetime  cap  is 
reached,  ARMs  were  good  to  have 
over  the  last  three  years,  as  interest 
rates  remained  low.  With  the  possi- 
bility of  higher  rates,  consider  the 
worst-case  scenario. 

Further  analysis  displays  the 
break-even  times  for  the  ARM  in 
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Commodore  64/128  Bargain  Basement— Dozens  of  Titles  For  Less  Than  $10! 


/-»JL.VJU-\1_/I_ 

Experience  matitind's 
grealcst  space  advcn- 
turc.  Realistic  ik-jjittioM-p 
of  every  stJBe  uf  the 
historic  first  moon  flight. 

s 

Apollo  18 

SDA  Discount  Price 

$9.88 

Firr  Slorm fJ.UU 

ACCOLAOt 

A(Po)  Acfi M.BB 

Apnilo  ia S9.UH 

Clrd  Slurks SI.IUI 

FiKhl  Nixhl S'i.BB 

HdKlbdll i%m 

Pnmi  Al  Sra SI.IIH 

ACTIVISION 

Alitm Vim 

CiTH  Ciurtry  lliud  ItertViKI 

ChcHlbuvlPTt $<«.88 

H«tfr  1  w  l.-ViMH  U. 

Frnj.ltur tt.aa 

Shinpthj) it.m 

Trjn^ornH'rs %*iM\ 

Bi'jth  llbnkFt 

ViillL'vbjII $4.Ba 

tqurvlrldn  SttOM 

lumper 0,86 

HiilhlJid  Gj(n«   .  .  .$<».88 

Thjt  Buninji V^.BB 

A VANTAGE 

r)ftf|ili)r S').8M 

DciiTl  fun i4.HH 

kl  Buys  .      i4.HH 

PUsmjIiim il.BK 

Plujtil  Spjccr  SlitrunSI.BB 
Spy  yt.  Spi  t  &  2   .    i-I.BS 


BOX  OFFICE 

All   

.S4.BS 

H'nh  RiiIIl'» 

.S9.68 

StDO.tKHJ  Pytdmfd 

tf.BS 

BttODEKBUNU 

Aitxle  Com'  Cimtt.  KitS^JB 

Cjuldrun   ...._. 

M.BB 

CtioplifkT.'Djvld'^ 

Midnighl  Mdftif 

.$(>.88 

Kdrateka  

Sfi.BB 

Lfid^  runnier ...... 

.$b.B8 

MJHWtnin 

.  SS.BB 

Mipfibiko  Chjllftidj  «.88 

CDA 

Anwf.  CooU  ffpfich  iS.BB 

CmtMAWARE  CLASSICS 

Sinlijd   

,  ViM 

COSMj 

Suit!  OiM  liv:  ..  .    M.BB 

Switt  EXslitop  Piil)Wiw*6,88 

S»ift  Muitc M.B8 

Snill  Pdint  .  ...  .Sfa.BB 
Swift  Spicadihrvt  -It.Sa 
Swift  Ward  Pi[Ki'«ytir$ti.aB 
DATA  EAST 

Eyprcyy  Rjidiv*   JB.Bfl 

O-Bi-rt   ja.BB 

INk  111 tBja 

EASY  WORKING' 
SPINNAKER 

Filfr ib.BB 

Phnnei S6.8B 


Get  ready  (or  pirales 
&  gcnies,  romance  & 
heartbreak,  comedy 
&  tragedy,  set  in  a 
fantastic  universe 
Ihal  begs  to  be 
explored. 

i.iNk  „mt         1 

^ 

SiFibad 

Our  Discount  Price 

$9.88 

Wdlri   $6.88 

tltCTRONIC  ARIS 

Ady,  Conil.  Set  19.1X1 

Anicr.  Cup  Sailing  .  .  S7,B(I 

Arctic  Fai   J9.M 

DfJIIldird tl.Bll 

FinancijI  Cookbook  .S7.BH 
Hjfd  H.lt  Mjcii  ....  i7,8a 
Hi-jrr  at  Alritj   - .  .  -S7Hfla 

Inyrjnr  Mmk $4,BB 

U'hl.Tiy  [jl  rVndt'nls  .S't.BM 
Lord^  III  C<iiii|iic%t  .  .S'l.lM 

.Sl.irbli'  M.iilm-« I'l.lill 

.Stmii  Coriit.  5t-l  .  ,  .iU.BN 

l>i'|;jsui    S1.BH 

Pinlijll  Conit.  Set  .  .  il.m 
Rjdfn  Dcyt.  Set  .  ..S^.Ba 
Reilir  ul  ImpoyubilityST.Ba 
Scyrn  Cities  ot  Cold  i9.ta 

Skyfot    59, BS 

Skyb>t  i  .  . SI.BU 

Sujltr  Bliuldcr  Davh  .  S9.BII 

Thr  Sl.indinji  Slunt't  S7.l<a 

rriuibdiiwn  Football  S'l.BU 

Ultimltr  Wi/4rd   ..  .SI.UU 

World  Tour  Coll  ...S9.B8 

[PY> 

CNjmp  Wrestling  .  .  .  Sti.aa 


88 

SB 

O.B8 


Win,  Lotr  or  Dra»   .  S4I.88 
KMECH  FKPRESSIONS 
5*sdmc  Stret*t  Seritt: 
Aslrn-Grover  .....  .$&.B8 

Big  Bird's  Spnijl 

Ddirery   $b.88 

Ernie's  Big  SpJiih .  .  .  Sb.SB 
Ernie's  .Mat^ic  Shapes  tb.SB 
Cfover 's  Antrrijl  Adv.S6. 
Pals  Around  Town  .  .16, 
Sesame  SI.  Print  Kit 
INFOCOM 

Ftitlhhiker's  Cuide, .  S4.8B 

Inlocomiis; 

Gamma  Foire  .  .  .    SB.BB 

Lane  .Mastadon  .      SB.BB 

Zori  Queit  1  or  ;M8.Ba  Ea. 

leather  Coddesift  .  .S9,BB 

Zork  t    i9.8B 

KONAMI. ACTION  CI  TV 

Cirtui  Charlie S1.88 

Hyper  Sport  ■.'Ping  P<ingS9.a8 
MASTEHIROMC 

Bounid-r Vb.88 

Captain  ^aji  Mj.BB 

Energy  Warrior     .  .  .  .Sti.BB 

Feud »i.88 

Lay!  V-8   H.B8 


2  Dynam 

At  Ns 

te  Bffjderbund "  Titles 

;w  Low  SDA  Prices! 

NOW 

$6.88 
Each 

1 

1    UdcKaantr 

kARAtek^v 

^^•*  *  iZjr^if^'M 

*JU 

P.S,  Craphicv  ScfjfjtHM>L 

«1:  Spnrts S't.BH 

']:OII  the  Wall..  Iq.Bfl 

-irSihuot i9.B* 

CAMtTFK 

Cjndy  land  $9,afl 

Chiitry  B.  Ladders  .  .  SI.BIt 

Diiullle  Oarr S9,B(I 

Co  To  Heart  o(  Class  19, a« 
Itulltnood  Squares  .19. BH 

Pfiir  is  Ri^ht    Call 

Suiter  PjtiMord  .  .  .    19. BH 

GA.WSTAR 

Champ,  Baseball  ...19JH 

Champ,  Basketball.  $9.BH 

CFL  Cli.  Fnolball  ...19,BS 

On  Court  Tennis  .  .  .19.8B 

Star  League  Baseball' 

On  Fieirt  Foutlljll  .S9.BB 
Star  Rank  Boiin^i  7  .19.BH 
FtlTiOt  EXPRESSIONS 

Award  Warr   14.811 

Matter  horn  S(r^.imerlli.HH 

Print  Pusser 14.Btl 

tiini  Sawyer's  Inland  lii.BIt 


Nirija W.BB 

Pro  Gnll 14.Ba 

Prowler:  Wjr  in  JtjUSb.BB 

Shogun 14.88 

Slam  Dunk 16.S8 

Squash   Sa.BB 

Storm 16.88 

Ten  Speed 16.88 

Vrgds  Poker  t, 
\Mipa\  14.BS 

Water  Polo 16.BS 

StCA 

Congo  fluoaolRl.  .      14.88 

SttARE  OATA 

Concentration 19.BB 

Concentfjiion  i  19.88 

Family  Feud   18.88 

leopardy 18,88 

teupardv  |r 19,B8 

leopardy  2  ..  .19.88 

Skate  RiKk         .  16.88 

Sports  Jeoparity .14,88 

Wheel  of  Fortuiw  .  .  -18.88 
Whit'l  ol  tortune  2  .14,118 
Whtil  of  liirtuiM'  t     14.tl8 


Step  thru  the  exhibit 
windows  of  a  magical 
museum.  The  best 
selling,  role  playing 
fantasy  adventure 
awaits  you. 


Legacy  of  the  Ancients 
SDA  Discount  Price  S9.88 


SIERRA 

Frugger 16.88 

Grojt's  tteyrn]<r ,  ,  . .  .16,88 
Wi/ard&  the  Prin(eysl6.88 

\Sn  Typir 16.88 

SPtCIRO.VI  HOlOBVIi 

Gato 19.88 

SPfNNAKtR 

Cosmic  Comljat   ....  14,88 

Darli  Tower   14.88 

Film  .Maker 14,88 

Gold  Retiird  Rat  IT      .14.88 

Karate  Chop S6.8B 

learn  the  Alphabet  .  .14.88 

learn  to  Spell 14,88 

learn  to  Add    14.88 

R.ulro,iil  fytoon 14.88 

Sliiii  M.Hliirle 14.88 

SFHl\(;HOARn 
Cfrllfitalc  Maker  ...14,88 
CM.  librafy  Vof.  f  .19.88 

Newsroom   19.SS 

N'.R.  Art  <l.  2.  <x  119.BS  {a. 

TtlARIUM 

Nine  PrirHes  in 

Araber $4.88 

Perry  Mason:  Case  of 

\yandarin  Murder    .19.88 
THIIMIER  .MOUNTAIN 

IJigOug 18.88 

Doi  Ihr  Ik-ytroyff  .  .1*88 
Fekjny 19.88 


Gjlaiian 1)1.88 

)r.  Pai  Man    IB.BB 

Ml.  Pat  Man    la.BB 

.Morder  by  the  l>oirnl9.B8 

Mutil  Writer    16.88 

Pat  ,Sian  18.BB 

Pole  Position 18.B8 

Kamhn:  Fir^t  Skjod 

Part  II 16.88 

Slut  Car  Racer    16.88 

Super  Pat  Man 19,88 

Top  Gun K..B8 

Winter  Chaltenxr     .  .19.88 
BAILIE  WARE 

Artist W.B8 

EduiJtar 14J8 

Entertainer   S4.B8 

Hume  Banker 14.88 

HonK  .Manager 14,B8 

Kitthen  .Manager  14,88 

ASK  YOUR 
SALESPERSON 

FOR  THE 

COMMODORE 

SALE  ITEM 

OF  THE  MONTH!!! 


Hl.KC'IKllML  \\\\^- 


BASEBALL" 


You  control  all  the 
field  action.  Pitching, 
hitting,  catching,  out- 
field relays  &  base 
running.  4  divisions. 
24  teams.  Playoffs  & 
more.  '• 

Championship  Baseball 
SDA  Discount  Price  $9.88 
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ABACUS  BOOKS 
Amlomf  of  the  1541  .t14 
Aiulomy  of  rhr  Cfi4  .  .1)4 

1571  InlL'inJill ..tl4 

CEOS  Imtdr  &  Oul   ..$11 
CEOS  Trkki  &  1ip>  .  .$U 
ABACUS  SOfTWARE 
Aswmbler  Monitor  ,  -  .S2S 

Bask i2S 

Bask  lis   iJ9 

■Scckrr  Batk 1)1 

Cjd  Pik J2S 

Cad  Pak  12a %i9 

Chart  Pdk  b4  iir  12a S2S[a. 
Cobol  (>4i>r  IIB..$2S  Ea. 

Fortran   $1% 

PCM    $35 

PCM  118 »W 

Speed  TerlT>64ar  12B$2S 
Super  C  M  ur  128  S39  Ea. 
Super  Cascal  M  or  136*3^  Ei 

TAS $25 

TAS  12B $19 

'  lt«|u<r«  CEOS! 

ACCESS 

Echtton  wllp  Stik  . .  .SI9 

HMvy  Mclal $15 

Leadrr  Board  lOriglnal) 

3  Pack $14 

rmlh  Frame $2S 

Triple  Pack:  SHI,  eH2, 

Raid  Over  Moscow  ,S14 
World  Cla»  L.B.  Coll.$25 
World  ClaH  LB.  Coll 

FamCajne  U«3$14Ea. 
ACCOtADt 

Bubhir  ChiHt  ... $14 

FatI  Breati $19 

4th  ^  tnthn  FiK«balt.$l9 
4th  &  Inches  fram 

Cun  It  ruction  Oilli  .S9.BB 
Crand  Prit  Circuit  .  $19 
lack  NkklauiColi  ...$19 

Mini  Put! $19 

Rack  "Era S19 

Sene  &  Volley  .  . St9 

Ten  Drive $19 

Int  Drivr  2:  The  DurlS19 
I.  Dr^  2:  Calf.  SnTirf>$9.e8 
r.  Dritr  2  Super  Catv$<;.BB 

The  Train    $19 

T.K.O S19 

ACTION  SOFT 

Thunder  Chopper  ...  .$19 

Up  Prriscot>e! 519 

ACTIV15ION 

Black  jack  Ac«iemv  .  .S25 

Chop  'M  Drop $19 

CrosslK^w    $19 

Faery  Tale  Adventure  .$35 

Ft4  tomcat $2S 

FIB  Hornet $23 

lad  Ninia  1  nr  2  ,$23  Ea, 

Maintrame. $33 

Manlat  Mansion $23 

Mifiht  &  Magic  1  nr  2$3r>  Ea. 

Neurnmanccr $2r} 

Ocean  Ranker $25 

Rampage S23 

Sky  Travel $33 

Zak  McKracken $33 

AMtaiCAN  EOUCATIONAl 


Biolnuy St  2 

Lrarn  to  Dead  (Cr.  1-4)$2S 
Science:  Cradci  3'4  .  .$12 
Science]  Grades  5.''fr  .  .S12 


Science:  CrMtn  7/B  .    $12 

US  Ceoitrlphy    $12 

US  HlUnry   $12 

World  Geography  ...  .$12 
World  KiMary .$12 

ftirnggj 

Briijge  S.O $19 

Cycle  Knight $14 

Daily  Double 

Horse  Racing $14 

llnkword  Lan];uage§$16  Ea. 

Strip  Poker $21 

Data  Disk  itt  Female  .SU 
Data  Disk  •2  Male  ...$14 
Data  Disk  '3  Female  .$14 
/^VALQN  HILL 

NBA  BaOietball $2$ 

Spitfire  '40 J33 

Super  Sunday $21 

SBSGen.  Mgr.  Disk  ,.$19 
SBS  19B7Tcani  Disk   .$14 

Under  Fire   S21 

BATTEHtiS  IIVICHjnED 
Pipeicllp  Publliher .  .  .$1J 

Paperclip  3 %n 

BAUD  Vint 

Award  Maker  Plus  . . .  $2S 

Staring  Paddles $2J 

Rainy  Day  Camrs  .  .  .  .$t9 

Videu  Vegas S19 

BERHtLEY  SOf  TWORKS 

Ceoi  128  2.0   $44 

CtO-Cdk  128 $44 

Ceo-file  128 $44 

Ceos  64(2.DI   $39 

•Desk  Park  Plus $19 

•Font  P«k  Plus $19 

•Ceo-Chari $19 

■Ceo-Cak $33 

•Ceo  file $33 

"Geo-Programmef   ...$44 

•Ceo-Publish $J3 

'Res|sjires  Geos  64! 

BOX  OFFICE 

CaliEornid  Rakins  . . .  .$lt 

Psycho $1« 

BRODERBUNP 

Bank  St,  Writer $33 

Carmen  Sandie^to! 

Europe $3! 

USA $2S 

World. ,...,$33 

Print  Shop $26 

P.S.  Companion $23 

P.S.  Graphics  Libra rv 

ft,  <2,  or  •}...$16  Ea. 
P.S,  Crapbits  Library 

Holiday  tdhtion  .  .  .  ,S16 

Sim  City   $19 

Star  Wars $19 

Toy  Shop S19 

CAPCOM 

Blunk-  Cummando  .  .  .$19 

Chnttt  &  Goblins  ....  $19 

Gunsmoke ,  .  $19 

Side  Arrat $19 

Speed  Rumhler $19 

CENTRAL  POINT 

Copy  2   ill 

CINEMAWAHE 

Defender  at  the  CrownS23 

Rocket  Ranger $21 

The  Three  Stooges   .  .  .SI J 

Warp  Speed  tR  I $11 

CMS 

General  Aul.  t3H       $119 


Inventory  118 $49 

COSMI 

Chump! $1b 

Hume  Ollice $3S 

Navcom  b $19 

.Navy  Seil S19 

Presumed  Cuilly!   ....$1& 

Super  Huey  2 $14 

DATA  EAST 

Bad  Dudes .$19 

Batman $1b 

Bteakthru   $19 

Cummando $14 

CuerriHa  War $19 

Heavy  Barrel $19 

Ikarl  Warriors $19 

Karnov  $19 

Platoon $19 

RoboCop $23 

Speed  Buggy .$19 

Tag  Team  Wrestling  .  .$14 

Victory  Road S19 

DATA  SOF  I 
Alternate  Reality: 

The  City $19 

The  Dunseon $19 

Hisnurck $19 

Cosmk  ReM SI  9 

Tire^one   $19 

Global  Commander   ..$19 
Hunt  lor  Red  October  Sib 

Lancelot   521 

Rubicon  Alliance $14 

Time  &  MaRik $31 

VirJeo  Title  Shop  w> 
Graphics  CompanrDn$21 

DAVIDSON 

AljebUster $J3 

Math  Blatter 532 

Spell  II   $33 

Word  Attatt $12 

DLStCNVVAaE 

Body  Trans|}arent  .  .  .  .519 

Designasaurus  ......  .523 

Spellicopier $19 

DIGITAL  SOLUTIONS 

Poiket  Filer  2 $23 

Pocket  Planner  2    $23 

Pmktt  Writer  3   $33 

'All  3  in  I  Super  Pack $39 
DIGITtK 

Hollywood  Poker $19 

Western  Games    $19 

EUCTRONIC  ARTS 
Bard's  Tak  1,2  or  JS26Ji. 
Bard's  Hints  1,  2  or  159  Ea. 
Battles  of  Napolean  .  ,$32 
Caveman  Ugh-lympics  $21 
Chessmaster  2100  .  .  .  .526 
Chuck  Yeager's  AFT  .  ,521 

Demon  Stalker 52) 

Double  Dragon 521 

Dragon's  Lair   519 

lordan  vs.  Bird  .....  .521 

Matik  CamJIe Call 

Modem  Wars  $21 

Cower  Play  Hockey   .  .519 

Project  Firoslan S2J 

Skate  or  Die 531 

Star  Fleet  1 $26 

Strike  Tteet 531 

The  Mars  Saga  S33 

Wasteland 536 

tfVX 

Ase  ot  Rage   Cal^ 

Batlteship   519 


California  Gan>es  ....  $34 
Create  A  Calendar   .  .  .  $19 

Death  Sssurd 519 

Destroyer $14 

Dive  Bomber 514 

Fast  Load  <RI 524 

Final  Assault $14 

4  I  4  Off  Road  Rating  514 
Impossible  .Mission  2    .514 

L.A.  Crackdown   514 

Legend  of  Blacksllvcr  .524 

.Melrocross 516 

.Mindroll   524 

Space  Station  Oblivion $14 

Sports-A.Roni    $16 

Street  S|>orts: 

Baseball $14 

Basketball $14 

fontball $14 

Soccer $M 

Sub  Battle  Simulator . .  $14 
Summer  Games. ....  ,$14 
Summer  Games  3  . . .  .$14 

Technocop    $34 

The  Games: 
Summer  Edition  ....  $34 

Winter  Edition $24 

Tower  Toppler $34 

Winter  Games $14 

World  Games $14 

FIRST  ROW 

Honeymooners $19 

Star  Empire $16 

CA.MESTAR 

Take  Down $19 

INFOCOM 

Battletech  $2$ 

Zork  Trilogy $29 

INKWELL  SYSTtMi 
■!170C  Oeluie  L.P.  .,.$49 

>1S4C  light  Pen $44 

Flesldraw  3.5 $21 

Graphics  Calleria  «1    .$19 

Graphics  Galleria '2   .519 

Graphics  Integrator  2  .$19 

INTRACOHP 

Bumper  Sticker  Maker  511 

Business  Card  Maker  .525 

Button  &  Badge  MakerSlJ 

LUlinsale  Casino  Cani)£ng53  J 

LOGICAL  DESIGN 

Club  Backgammon  . .  .519 

Vegas  Craps   $19 

Vegas  Gambler 519 

MASTERTRONIC 

.Monopoly $26 

Risk $26 

Scrabble  . $23 

Scrupples $31 

MEDALIST 

Pro  Soccer   $25 

Pure  Sl.it  Baseball...  $35 
MELBOURNE  HOUSE 

Barliarian    $19 

|ohn  Elivay's  QB $19 

War  in  Middle  Earth.  .$13 
MICBOLEACUE 

Baseball. $25 

Eo»  Score  Stats $16 

87  or  BB  Team  Disti$14  Ea. 
General  Manager  .  .  .  .519 

VVWF  Wreslling   519 

WWF  Superstars  Vol.  1514 
WWF  Superstars  Vol.  2514 
MICHOPROSE 
Airborne  Ranger 531 


F.li  Strike  lagle 52S 

Gunsbip 523 

Pirates $2i 

Project  Steahh  lighter  539 

Red  Storm  Rising $2S 

Silent  Service  $25 

MINDSCAPE 

720  Skateboarding  .  .  .523 

Action  Fighter 519 

Alien  Syndrome  ....  .$23 

Aussie  Games $19 

Bad  Mreel  Brawler  .  .  .519 

Blorkhosler $19 

Ca^llain  Blood .  .  .$21 

Clubhsruse  Spurts  ....  $19 
Color  .We:  The  Computer 

Coloring  Kit $21 

Comhat  [!ourse  , $19 

Crussssiirrf  Magic   ....  $19 
•Deeper  Dungeons .  .  .$16 

De  |a  Vu $31 

Gaunllet $21 

Harrier  Combat  Sim.    $19 

Hostage. , , , , $19 

Inifiana  |ones  &  The 

Temple  of  Drrum  . . .  $21 

Irsdos^  Sports $19 

Infiltrator  2 $19 

Inl't  Team  Sports $19 

Sgt,  Slaughters  Mat  WanCal 
Into  the  Eagle's  Nest.    $19 

loker  Poker $19 

MISl  Soccer 523 

Out  Run $23 

Paperboy $23 

Perfect  Score  SAT $44 

Cower  Players  Joystkk  519 

Road  Raider $  1 9 

Road  Runner $33 

Super  Stat  Ice  Hixkey  $23 
Super  Star  Soccer  ,  .  .  ,$23 

Thunder  BLaik'    $3) 

Uninvited $33 

Willow    $19 

*Ke()uires  Gauntletl 

MISC 

Bob's  Term  Pro .$39 

BsA's  Term  Pro  13fl  .    $39 

Doodle   $25 

final  Cartridge  3 $47 

Font  Master  3 $31 

Font  .VUsler  128 $29 

Superliase  64    $25 

Superbase  128    $31 

Superscript  64 $21 

Superscript  12B $2! 

Super  Snapsliut  IR)  .  .  .$47 
ORIGIN 

Auloduel 52s 

Moebios  $25 

Tangier!  Tales Calf 

Times  of  Lore $35 

Ultima  4  or  5  ....  $39  Ea. 
Ultima  5  Hint  Bnok   .  .    $9 

Ulllma  Trilogy 519 

PROFESSIONAE 

Fleel  System  3  Plus.  .  .513 

Fleet  System  4  128  .  .  .543 

SIMON  &  SCHUSTER 

jK  lasser  Money  Mgr.  514 

Typing  tutor  4 $3S 

SIR  TECH 

Deep  Spate $33 

Knight  of  ntamond)  . .  $3S 

Proving  Ground   ....  $25 

li! 

Demon's  Winter  $21 


Eternal  Dagger $36 

first  Over  Gerinany  .  .$12 

Gettysburg   $J9 

Hlllsfar   $25 

Heroes  ot  the  LarKe.  .Call 

Overrun    512 

Pan/er  Strike! $29 

Pool  at  RadiarKe  .  .  .  -$26 
Typftocm  of  Steel  .  .  .  .S12 
War  Game  Const.  Set.52T 
SIMON  &  SCHUSTER 

Star  Ire*!  Rebel $23 

SPINNAKER 

(I  Working  TrI-Pack..  51 4 

SUB  LOGIC 

rtiglit  simulator  1  ....  533 

t.S,  Scenery  Disks  . .  -Call 

let $36 

Stealth  Mission $33 

TAITO 

Alcon $19 

Arkanold $19 

Bubble  Bobble  $31 

Operation  Wolf   $21 

Ql» Call 

Rastan $21 

Renegade $21 

Sky  Shark  $11 

THRtt  SIKTY 

Dark  Castle $21 

Thud  Ridge Call 

Warlock   $19 

IIMEWORKS 

Data  Manager  3 514 

Data  Manager  128  ...$33 
Eselyn  Wood  Reader  .$14 
Ssviftcaki'Sideways  ..,$14 
Swificak 'Sideways  138$33 

Word  Writer  4 $35 

Word  Writer  128  $31 

UNICORN 

E>ecirru1  E>ungedn ....  $19 

Percentage  Panic   ...  .$19 

Ten  Little  Robots    $19 

UNISON  WORLD 
Art  Gallery  1  or  2  $16  Ea. 
Art  Gallery:  Fantasy  .  .516 
Print  Master  Plus   ....  $31 
WEEKLY  READER 
Stkkybear  Series: 

ABC's   511 

Math  1  or  3 $33  Ea. 

Nomberi $21 

Opposites $21 

Reading 521 

Spellgrabber  .......  .$29 

Typing $29 

ACCESSORIES 
Animation  Station  .  .  .  .$49 
Bonus  SS,  DD  ..$4.99  Bi. 
Bonus  DS,  DD,,$5,99  Bx, 
Cismpuserve  Starter  Kil$19 
Contriver  Mouse ....  ,$13 
Disk  (Case  (Holds  7S)$6,BB 
Disti  Drive  Cleaner  .$«.BB 
Epy»  3flfl  XI  loystick  $9.BB 
Epy>  500  XI  loystick..  51 4 

Iconlroller 514 

Sony  i'.;  DSDD.$6.99  Bi. 

WicoBat  Handle $17 

Wico  Boss $13 

Wico  Ergoslick  1,5.  -  -  .$19 
XETEC  Super  Graphii.$59 
XETIt  VfW  GrapHi  G(4d$79 
XETE  C  Sc^r  Grapbii  fr.539 
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each  scenario,  This  tells  you  how 
soon  you  must  sell  for  the  adjust- 
able rate  mortgage  to  make  sense. 
Finally,  press  f5  again  to  print  the 
cost  analysis  table.  This  printout 
tells  you  the  inflation-adjusted  cost 
for  each  mortgage  and  what  the 
monthly  payment  on  the  ARM 
might  be  in  the  future. 

Life  Insurance  Needs 

Ask  five  different  financial  planners 
and  you  may  end  up  with  five  dif- 
ferent answers.  So  use  this  program 
only  as  a  rough  guide  when  consid- 
ering your  life  insurance. 

The  program  bases  your  life  in- 
surance needs  on  the  following: 

1.  Final  expenses,  such  as  the  funer- 
al. This  figure  doesn't  include  pro- 
bate costs,  estate  taxes,  or  medical 
expenses  due  to  a  lengthy  illness. 

2.  Paying  debts,  based  on  your  per- 
centage of  total  household  income. 
Debts  are  not  paid  up  unless  you 
are  the  sole  source  of  income, 

3.  Replacing  your  income,  based  on 
income  and  number  of  dependents. 
This  amount  figures  in  Social  Secu- 
rity survivors'  benefits  if  you  have 
children. 

4.  Sending  children  to  college  and 
any  gifts  to  charities. 

Financial  Planner  determines  your 
current  assets  and  then  subtracts 
the  sum  of  the  four  items  above, 

Total  household  salary  income. 

Add  up  all  salaries  before  taxes.  Ex- 
clude any  money  earned  from  inter- 
est, dividends,  or  rental  property. 

Your  salary,  before  taxes.  If  you 

are  single,  then  this  is  the  same  as 
the  above  amount. 

Annual  savings.  The  total  amount 
the  household  saves  each  year.  In- 
clude everything:  retirement  sav- 
ings, college  funds,  and  vacation 
money.  This  is  used  to  figure  out 
how  much  income  needs  to  be 
replaced. 

Your  age.  This  is  used  in  deciding 
what  type  of  life  insurance  policy 
you  should  have. 

#  of  people  in  household.  Include 
yourself  in  this  count.  As  a  general 
rule,  the  more  people  there  are,  the 
more  insurance  is  needed. 

Age  of  youngest  person.  This  fac- 
tors in  when  you're  figuring  out  re- 
placement income.  Young  children 
need  income  supplements  for  a 
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long  time. 

Next,  total  the  assets  of  all 
household  members.  Esrimates  are 
fine.  Include  your  personal  IRA  ac- 
count, but  exclude  your  spouse's. 

Cash,  savings/checking  accounts. 
Add  up  the  balances  from  all 
household  bank  accounts.  Include 
CDs,  savings  bonds,  and  Treasury 
securities. 

Stocks,  mutual  funds.  Include  the 
value  of  stock  held  by  any  house- 
hold member  as  well  as  the  value  of 
your  retirement  funds.  Don't  in- 
clude retirement  funds  held  by  oth- 
er members  of  your  household. 

Hard  asset  investments.  Include 
tangible  assets  like  a  coin  or  stamp 
collection,  antiques,  or  rental  prop- 
erty. Exclude  your  primary  resi- 
dence and  cars  (unless  they  are 
collectibles). 

Next,  total  the  debts  for  every- 
one in  the  household.  As  with  as- 
sets, estimates  will  suffice.  If  you 
and  your  spouse  share  responsibil- 
ity for  paying  the  monthly  bills  and 
one  of  you  dies,  the  survivor  can  srill 
pay  some  of  the  bills.  The  program 
uses  a  weighted  percentage  in  this 
calculation.  If  you  bring  in  50  per- 
cent of  the  total  household  income, 
then  70  percent  of  the  debts  are  to 
be  repaid  by  your  life  insurance  if 
you're  in  a  28-percent  tax  bracket. 

Home  mortgage.  Enter  the  balance 
that  you  owe  (check  your  annual 
statement).  If  your  family  doesn't 
own  a  house  but  plans  to  buy  in  the 
next  year,  then  enter  the  amount 
you  plan  to  borrow.  If  you  have  a 
life  insurance  policy  as  part  of  your 
mortgage,  enter  0  here. 

Car  loan.  Total  up  all  outstanding 

balances.  Again,  estimates  are  fine. 

Consumer  debt.  Balances  due  on 
credit  cards  and  personal  loans. 

College  fund.  If  you  have  no  chil- 
dren, enter  0,  Otherwise,  use  mod- 
ule  1  (College  Planning)  to 
calculate  the  amounts  needed  for 
each  child,  add  them  up,  and  then 
place  the  total  here. 

Charitable  contributions.  This  is 

the  place  for  donations  to  your  fa- 
vorite charities  or  relatives. 

Current  interest  rate.  The  rate 

your  estate  can  earn  with  no  risk. 
Ten-year  Treasury  notes  would  be 
an  ideal  place  to  put  the  money  to 
earn  income;  these  are  now  yield- 


ing about  9.35  percent. 

Output.  A  policy  type  and  amount 
of  insurance  will  be  suggested.  Life 
insurance  can  be  very  confusing. 
All  types  of  life  insurance  have  pre- 
miums and  a  death  benefit.  Premi- 
ums are  what  you  pay  in;  the  death 
benefit  is  how  much  your  estate  is 
paid  when  you  die.  Universal  and 
whole  life  policies  also  have  cash 
value.  What  follows  is  a  short  prim- 
er on  the  different  types  of  policies. 

Term  insurance  provides  cover- 
age for  a  specific  time  period.  Your 
annual  premiums  stay  constant 
during  each  policy  term.  With  each 
renewal,  premiums  go  up.  This 
may  not  seem  like  a  good  deal,  but 
remember,  insurance  needs  are 
greatest  when  you  have  young  chil- 
dren. A  term  policy  may  be  partici- 
pating (dividend-paying)  or  non- 
participating.  Dividends  on  term 
policies  tend  to  be  small,  so  it 
doesn't  make  much  difference  if 
your  policy  pays  a  dividend.  (It 
does  matter  a  great  deal  for  whole 
life  policies.) 

With  term  insurance  you  don't 
get  any  cash  value;  you  are  paying 
only  for  your  insurance.  If  you  live 
or  work  in  Connecticut,  New  York, 
or  Massachusetts,  you  can  buy  term 
life  insurance  from  a  savings  bank 
at  very  low  rates.  Term  insurance 
gives  you  the  most  coverage  for  the 
least  amount  of  money  and  is  rec- 
ommended if  you  need  a  lot  of  cov- 
erage but  don't  have  a  lot  of  income 
or  if  you  are  a  disciplined  saver  and 
have  moderate  insurance  needs. 

Universal  life  insurance  is  the 
most  versatile  type  of  poUcy.  There 
are  three  elements  to  universal  life: 
premium,  cash  value,  and  death 
benefit. 

The  annual  premium  is  what 
you  pay  in.  The  company  makes  de- 
ductions for  expenses  and  the  cost  of 
your  insurance.  What  is  left  over  is 
your  cash  value,  which  earns  tax- 
deferred  interest.  Money  in  the 
cash-value  account  can  be  with- 
drawn or  used  as  loan  coDateral. 

Universal  life  policies  come  in 
two  varieties.  Under  Option  A,  your 
survivors  receive  the  face  amount 
of  the  policy;  with  Option  B,  your 
survivors  get  this  amount  plus  the 
accumulated  cash  value.  You  pay 
more  for  Option  B  and  in  effect  get 
a  little  more  insurance. 

Buying  universal  life  is  almost 
like  buying  term  insurance  and  in- 
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■  E*sy  do-ft-yoursol!  Inslallalion.  No  electronics  expeiiDnce  or  special  lools  re- 
quired, inusiraiad  siep-iiy'Stap  iistruclons  inciudcd. 


li 
i 


Available  (or  C-64, 64C.  SX^,  C-12B  A  C-1ZB0  (JKfyDOS/UB  speeds  up  both  64 
and  123  motjM)  araJ  1541, 1541C,  1i41-l,  1571, 1581,  FSO-llI,  USD  SD-1&2, 
Eical  2001,  Enhancir20M,  Arvlaeh,  Swan,  Indus  &  Bluechlp disk  drives.  System 
includfls  ROMs  tor  computer  and  1  di^  drive.  stoctoJillyDOS  swrlching  system, 
iluslralad  insl^Balion  instruaions.  User's  Manual  and  Wonay-Baclt  Guarantt*. 


C-64SX-64  systems  $59.95;  C-1!e  C-12flD  systems  359.95;  Add'l  driva  ROM's  $29.95 

Please  add  S«  25  shippinghjndEng  per  order,  plus  S?  50  lor  AK.  HI.  APO.  FPO, 

Canada  S,  Puerto  Rico.  S10.00  add'!  lor  other  ovarseas  orders.  MA  rasnienisadd  5% 

sales  lax.  VISAf.lC,  COD,  Check,  Money  Order  Allow  2  weeks  lor  personal  checks. 

Call  Of  write  (or  more  irJormalion.  Oealer.  Dislnbutor.  i  UG  pticsng  available, 

Pteaso  specify  computer  and  drive  wtwn  ordering 

Creative  Micro  Designs,  Inc. 

P.O.  Box7S9,V/llbrohflm,MA  01 095  Phonc:(«in)525-(»I3 

50  Industrial  Dr.,  DOK  646,  E.  Longmi:adDV<,  MA  01023         FAX;  (4-l3)  62S.0147 


^y"  VIDEO  BYTE  the  first  FULL  COLORt 
^^^      video  digitizer  for  tlie  C-64,  C-128 

introducing  the  woriri's  (ifst  FULL  COLOR!  video  digiliiier  (or  Ihe 

CommorJore  C-64.  C-128  &  128-D  compuier. 

VIDEO  BYTE  can  give  you  digifeed  video  from  your  V.C.R.,  BW  or 

COLOR  CAMERA  or  LIVE  VIDEO  (thanks  to  a  (asl!  2.2  sec.  scan  time), 

•  FULL  COLOHIZINDl  is  possible,  due  to  a  unique  SELECT  and  INSERT  color  process, 
where  you  can  select  one  ol  15  COLORS  and  insrsd  ttiai  color  into  one  el  4  GRAY 
SCALES  This  process  will  give  you  over  32 .[WO  difterent  "color  comliinalions  10  use  in 
V-oijr  video  pictures 

•  SAVES  as  KOALAS!  Video  G/le  aiirrtvs  you  lo  save  all  your  pictures  10  disk  as  FULL 
COLOR  KOALA'S  Alter  wtiicli  (using  Koala  or  suitable  program)  you  can  go  in  anil 
redraw  Oi  lecotor  youi  Video  Byte  pie's 

•  LOAD  anrl  RE-DISPLAYt  Video  Byte  allrfws  you  10  load  and  ri-iSisplay  all  Video  Byie 
pictures  Irom  inside  Video  Byle's  menu. 

•  MENU  DRIVEN!  Video  Byte  comes  with  an  easy  to  use  menu  drivtn<  UTILITY  DISK  and 
digitizer  program" 

•  COMPACT!  Video  Byte's  hardware  is  compact!  In  lact  no  bigger  Itian  your  average 
cariridge'  Video  Byte  comes  wim  lis  Own  cattle. 

•  INTEGRATED!  Video  Byte  is  designed  lo  be  used  wild  or  wiltiout  EXPLOD£i  V4  1  color 
cairidge  £«plodei  V4 1  is  the  periect  tomganion 

•  FREEI  Video  Byte  users  are  automatically  sem  FREE  SOFTWARE  updates  along  wiiti 
new  docunvenlahon.  when  it  becomes  availaliie 

•  PflINT!  Video  Byte  will  pnnlout  pictures  lo  mosi  ptinlers  Hcrwever  when  useo  wiin 
Explode'  V4  1  icur  prinlout's  can  be  done  in  FULL  COLOR  on  the  RAINBOW  NX-IOOO. 
RAINBOW  NX-100a  C,  EPSON  JX-BO,  SEIKOSHA  COLOR  and  Ihe  OKIDATA  10^0. 

VVhy  DRAW  a  car.  airplane,  person  or  (or  mat  matter 
anything  when  you  can  BVTE  it 
Video  Byte  11  instead. 


VIDEO  BYTE  $79.95 


SUPER  EXPLODE!  V4.1  w/COLOR  DUMP 

II  your  looking  (or  a  CARTRIDGE  whch  can  CAITURE  ANY  SCREEN,  PRINTS  ALL 
HI-RES  ant)  TEXT  SCREENS  in  FULL  COLOR  In  the  RAINBOW  NX-1000,  RAINBOW 
fJX-1000  C.  EPSON  JX-80  and  Ihe  OKIDATA  10  or  20,  Pfinls  in  16  gray  scale  to  all 
other  primers  Comes  with  Ihe  world's  FASTEST  SAVE  and  LOAD  roulines  m  a  car- 
iridge or  a  dual  SEO,,  PRO  (ile  reader.  Plus  a  buiil-in  B  SECOND  format  and 
MUCH.  MUCH  MORE'  Than  Explode!  V4.1  is  lor  you, 
PRICE?  M4.95  +  S/H  Dr  $49.9S  w/opllonal  disable  switcd. 


I  vi: 


•  IN  64  IVIOOE  0(JLY 
H  reus  i  1^ 

TO  ORDER  CALL  OR  FAX  1-313-S51-6667 
Personal  Checks  10  D»)b  to  Clear 
THE  SOFT  GROUP.  P.O.  BOX  111,  MONTGOMERY,  IL  60538 


VIDEO  BYTE  only  S79.95 

SUPER  EXPLODE!  W.I  S44.95 
PLUS  SI  50  S/H  COD.'S  ADD  S4  00 
IL  RESIDENTS  ADD  6%  SALES  TAX 


MMO 

CO..  im:. 

OUR  ONLY  STORE 
iSTABLISHED   1950 

64  WEST  36th  ST 
NEW  YORK  CITY 
NEW  YORK   10018 


COMPUTER 
DISCOUNTS  4 

ON  ALL  YOUR    4 
COMPUTER      ^ 
NEEDS 


CALL  TOLL  FREE    | -800-45  I -9780 

NEW  YORK  STATE  niSIDENTI  CALL  (III)  A9S-7I 11 

CUSTOMER  SERVICE  (111)  «a7-llf3 

HOH.-SAT.    lOtOOAM-rjlOPM   •   SIJN.   1D:]0AM-e:00PM 


O  CcHnmodore 

Ho 


COMMODORE  64-C 
20  PC.  DREAM  OUTFIT 

OUIFII INCLUOES  Commodore  64  C  Keylinard 
•t541  Oisc  Drive  •12"  Compuier  MoriitflT 
•  Commodorf  Pfinitr  'AC  Adapter  •OAnfis 
Manual  "ID  OisketEei  s^  ^     m   ^ 

$348 


C'  Commodore 


s^ 


COMMODORE  128 
20  PC.  DREAM  OUTFIT 

OLtlflt  INCLUDES,  Comrnotae  128  KEybosid 
•1571  Disc  Dfjve  "12"  Compuier  Woniror 
•Ccmmortorf  PrmlEf  "AC  Adapter  'Owneis 
Manual  ^     _  ^  ^^ 

•10  OiskcriK  »/i  QP 


AMIGA  SCO 

TOP  OF  THE 
LINE  OUTFIT 

OUTFIT  INCLUDES:  Amiga  MO  With  Guill 

In  Drive  'Color  Mondor  •Printer  For  Amiga 

•Packaye  !})  10  Disketles 

•  Uwners  Manual 

•USA  Guararileir  $  7  9  8 

AMIGA  SOI   •  AMIGA  1010 
AMIGA   1010  /  IN  STOCK 


C'  Commodore* 

HARDWARE  /  SOFTWARE 


lis  COMPUTEI\ 

84  COMPUTER 

a4-C  COMPUTER 

HID  COMPUTER 
1141   OISC  DRIVE 
Ilill'C  DItC  DRIVE 
l!4t-ll  DISC  DRIVE 
1571   DISC  DRIVE 
list   DISC  DRIVE 
leeo  MODEM 
1670  MODEM 
I7&4  EXPANDER 
1700  EXPANDER 


I7S0  EXPANDtft 

till   MOUSE 
1701  MONITOR 

ISO]  MONITOR 
1901  MONITOR 
1001  MONITOR 
lOBO  MONITOR 
10114  KONITOR 
901  PRINTER 
BO]  PRINTER 
HPS'lOOO  PRINTER 
MPS-I1»«  PRINTER 
HPI'llIO  PRINTER 


ITIMS  SOLO  IE  PA  RATI  IT. 
CALLHpW  f  OB  NEW  ^OW  PBIHIIl 


C'  commodore 


COMMODORE  64 
10  PC.  DREAM  OUTFIT 

OUTFIT  INCLUOES:  CaminodorE  ^  KEyboaid 
•  1541  One  Drivt  •)2"  Compuier  Momloi  •Pnnlci 
for  CommoiJarc  "ftC  AtfiplCr  *Owiteis  Manga! 
•II)  Diskelles  •Faclorir        «  ^  a  g% 

Rt'condilioned  *  ^F  ^M  J% 


Cr  Commodore 


E^ 


COMMODORE   118  -  lO  PC. 
TOP  OF  THE  LINE  OUTFIT 

OUTFIT  INCtUDES:  Connnodoie  126  Keyboaid 

•Commortme  1571  Disc  Drive  •Commodore  1084 
FIGB   Color   Monitoi   •Commodore   IV1PS1200 
PiffiTer  •AC  Adapler  •Dwneis  Manual 
•111  Oiskeriej  tTAO 


C=  Commodore* 

Ho 


COMMODORE  I  28-D  10  PC. 
PROFESSIONAL  OUTFIT 

OUTFIT  INCLUDfS-  Ci^rmodme  128  0  Wilti  Built 
III  1!i71  One  OrivE  '\T'  CompuIBi  Monitiji 
•Commodore  Piintei  •AC  Adaplrr  •[Iwupit 
Manual  •10  Diskslles 


*598 


i    ^J  «  M  <>  D  (J 

/MVIIG 


CALL  F0R:^SS 
NEW  LOW 
PRICEt 


ALIO  AVAlLABLf^  AHICA    1DB4  MDHITOB 

'i.f"  iHTCHHAi  onivE   <aniDci  card 

HARD  DRIVE  COHTAOLLER  >3  MB  BAH 
EXPAHOER  'PACHAGE  DEALS  AVAILABLEI 


AtflGA.    2000    HD 
AFRICA    2SOO 

NOW  IN  STOCKt 


CHOOSE  YOUR  OWN  PACKAGE  DEAL 

MtX  &  MATCH  THE  COMPUTER  SYSTEM  THAT'S 

GOOD  FOR  YOU  ft  ONE  OF  OUR  COMPUTER  SPECIALISTS 

WILL  GIVE  YOU  A  SPECIAL  PRICE. 


ORDER  NO  Wit  PHONE  ORDERS  ONLY- 
CALL  TOLL  FRtt  I't00>4f  l-»T«0  NT  RESIDENTS  /  INFO  CALL  (11 1 1)  695-7 1  i  ] 

1 1  iF>  M  Z  Vm.  AME  X  0'  SiHvl  yonrr  Ordn,  Zvuiiti  Chfclii  il  Uttc^unAtt  &ttnA  Nm  Hiiwj  Fpcih  Shii^mg 
i.Ktfi^^  Hon  nplvidiblr  Fof  Mwl  Orden  Plr4»  Cj«  fyivr  Smdtnq  tn  Umr  ^^  A'  ^"  Si,tinT  To  'Atnuin 

riiiprif  Incrcji^rOrcrEi^iif  RpPLrndii.  )N\\hn  7  DUyi  Wf  Wilh  On^rijl  Packjgmy  %  tJnNkd  Gu^'ani^  tui  f(o 
RthnAi  Ac:!:B'|)if!d  V^nHnui  t^tw  Vfbjl  AiiiSnii/jFion  CuiltMner  Sc-rvicp  B»lA«n  12  pmG  pni  Piclurri  An-  For 

ftiintf  fat  WjiI  OrdtTi  (Fntf 


vesting  the  added  premium  with 
the  insurance  company.  This  can  be 
a  very  good  investment  because  it 
grows  at  a  tax-deferred  rate. 

Whole  life  also  has  the  three  el- 
ements: premium,  cash  value,  and 
death  benefit.  Typically,  whole  life 
insurance  premiums  do  not  rise. 
This  may  seem  good,  but  it  really 
isn't,  because  the  premium  starts 
out  high.  Some  companies  offer 
graded  premimn  or  modified  premi- 
um whole  life  insurance  policies 
that  have  lower  premiums  in  the 
first  few  years.  But  these  modified 
plans  don't  really  eliminate  the  dis- 
advantages of  whole  life. 

With  whole  life  policies  in  gen- 
eral, the  cash  value  accrues  with 
time,  and  you  can  borrow  against  it 
or  cash  it  out.  The  death  benefit  is 
paid  to  your  survivors  when  you 
die.  It  is  not  easy  to  decrease  the 
amount  of  your  policy.  This  is  a  ma- 
jor drawback  because  your  insur- 
ance needs  are  greatest  after  you 
have  started  a  family,  and  they  de- 
crease as  your  children  leave  home. 
Whole  life  is  recommended  for  peo- 
ple who  have  large  incomes  and  lit- 
tle or  no  savings,  since  it's  a  good 
method  of  forced  saving. 

New  on  the  scene  are  variable 
life  insurance  policies.  They  offer 
consumers  a  chance  to  invest  in  the 
stock  or  bond  market  by  putting 
their  investments  in  a  life  insurance 
contract.  Financial  Planner  is  not 
programmed  to  recommend  this 
type  of  insurance  because  your 
costs  and  cash-value  appreciation 
depend  on  how  well  the  stock  or 
bond  market  does. 

When  it  comes  to  life  insur- 
ance, the  standard  line  is  to  get  term 
insurance  and  invest  the  difference 
that  you  would  normally  pay  in  as 
premiums.  The  tax-deferred  appre- 
ciation offered  in  a  universal  life 
policy  is  an  attractive  way  to  save 
money  as  well.  Whole  life  lacks 
flexibility  and  most  families  can't 
afford  the  coverage  they  need. 

Refinancing  a  Mortgage 

Back  in  1982,  when  the  prime  rate 
reached  20  percent,  mortgage  rates 
reached  all-time  highs  of  15  per- 
cent. Now  that  interest  rates  have 
fallen,  it  may  be  time  to  refinance 
your  mortgage. 

CURRENT  FINANCING 

Current  balance.  The  amount  you 
owe  on  the  existing  mortgage.  You 

46    COMPUTERS  GazeHs    July  19B9 


can  usually  find  this  on  the  annual 
mortgage  statement.  You  may  also 
use  option  4  (the  Loan  Payments 
module)  to  print  out  a  schedule  and 
take  the  balance  from  there. 

Annual  %  rate.  This  module  han- 
dles fixed  rate  mortgages  only;  it's 
not  designed  for  adjustable  rate 
mortgages. 

#  of  payments  due.  How  many 
payments  are  left  to  make? 

SUGGESTED  REFINANCING 

Principal.  Usually  the  same  as  the 
current  balance  on  the  existing 
mortgage.  The  new  principal  may 
be  larger,  especially  if  money  is 
needed  for  tuition  or  a  new  car. 

Annual  %  rate.  Interest  rate  on  the 
new  mortgage. 

#  of  payments.  Term  of  the  new 
mortgage. 

Points.  A  percentage  of  the  princi- 
pal paid  when  you  take  out  the 
mortgage. 

Other  closing  costs.  Although 
you've  already  had  a  title  search, 
the  mortgage  company  requires  an- 
other one. 

Prepayment  penalty.  Many  mort- 
gages now  have  penalties  for  early 
payments.  This  is  to  make  mortgage- 
backed  securities  more  attractive. 

Tax  bracket.  Include  state  income 
taxes  in  the  total  percent. 

Interest  and  points  deductible,  A 

Yes  or  No  choice.  Points  are  deduct- 
ed over  the  life  of  the  mortgage  in 
our  analysis.  This  is  a  conservative 
calculation,  because  many  taxpayers 
can  deduct  the  points  immediately. 

Inflation  rate.  Use  the  value  of  the 
Consumer  Price  index  (CPI)  here. 

Output.  Displays  the  difference  be- 
tween the  old  payments  and  the 
new  payments.  If  refinancing  is 
profitable,  Financial  Planner  tells 
you  how  long  it  will  be  before  you 
reach  the  break-even  point.  Other- 
wise, the  program  tells  you  that  re- 
financing costs  you  money.  You 
should  keep  your  current  mortgage 
if  you  plan  to  sell  before  the  break- 
even time  or  if  refinancing  costs 
you  money.  If  either  of  these  condi- 
tions is  met  and  you  need  money 
for  other  expenses,  consider  a  home 
equity  loan  or  a  second  mortgage,  A 
rule  of  thumb  is  that  the  interest 
rate  on  the  new  mortgage  should  be 
at  least  two  percentage  points  below 


the  rate  on  the  current  mortgage  for 
refinancing  to  be  considered. 

IRA  Planning 

Your  age.  Used  in  figuring  an  early 
withdrawal  penalty  and  the  IRA's 
future  value. 

Current  IRA  balance.  How  much 

you  have  in  your  account  today. 

This  year's  contribution.  The 

amount  you're  going  to  deposit  this 
year. 

Estimated  annual  yield.  You  can 

get  around  9.23  percent  on  five- 
year  CDs  right  now. 

Current  tax  bracket.  Include  any 
state  income  taxes. 

Early  withdrawal  penalty.  Right 
now,  there  is  a  10-percent  penalty 
on  any  money  withdrawn  before 
age  59'/!.  Remember  that  taxes  are 
also  due  on  any  withdrawals. 

%  of  contribution  deductible.  The 
1987  Tax  Reform  Act  limited  the  de- 
ductibility of  IRA  contributions.  If 
you  are  not  covered  by  a  pension 
plan,  then  your  contribution  is  100- 
percent  deductible.  If  you  are  single 
and  report  an  adjusted  gross  income 
of  more  than  $25,000,  you  lose  $1  of 
deduction  for  every  $5  of  income 
over  this  limit.  So  at  $30,000,  only 
$1,000  can  be  deducted,  and  at 
$35,000,  none  is  deductible. 

If  you  are  married  and  filling 
jointly,  the  phase-out  begins  at 
£40,000,  with  $2  of  deductibility 
lost  for  every  S5  of  income  over  this 
limit.  At  $50,000,  none  of  the  con- 
tribution is  deductible. 

Retirement  age.  Most  people  retire 
at  65  or  67,  with  62  and  70  as 
alternatives. 

Tax  bracket  when  you  withdraw. 

There  is  no  way  to  know  this.  Con- 
gress may  lower  taxes  further,  but  a 
safer  guess  would  be  higher  rates. 

Output.  Financial  Planner  calcu- 
lates how  much  this  year's  contribu- 
tion will  be  worth  upon  retirement, 
inside  or  outside  an  IRA.  it  also  fig- 
ures out  how  much  your  entire  ac- 
count will  be  worth  if  you  contribute 
the  same  amount  each  year  and 
what  that  will  be  worth  after  infia- 
tion.  Finally,  the  break-even  time  for 
eariy  withdrawals  is  given.  This  last 
piece  of  informafion  is  very  useful 
should  you  need  this  money  before 
retirement. 
See  program  listing  on  page  84.      B 


1581 


y  Sorter 


Robert  Czeisel 


One  1581  disk  can  hold  almost  300  files. 
Being  able  to  store  large  amounts  of  data 
on  each  disk  can  be  quite  a  boon.  It  can 
also  make  finding  a  particular  file  very 
difficuh.  By  allowing  you  to  place  your 
files  in  any  order,  "1581  Directory  Sort- 
er" makes  them  easier  to  find. 

1581  Directory  Sorter  can  .sort  your 
directory  entries  in  alphabetical  and 
reverse  alphabetical  order.  You  can  also 
choose  to  read  the  files  in  their  original 
order  and  then  rearrange  them  your- 
self. Once  in  memory,  you  can  view  up 
to  96  files  on  the  screen  at  a  time  and 
you  can  move  files  from  place  to  place 
with  only  a  few  keypresses. 

Directory  Sorter  has  the  unique 
ability  to  detect  whether  it's  running  on 
a  64  or  128  and  whether  the  128  is  in 
40-  or  80-column  mode.  In  128  mode, 
the  program  uses  fast  mode  whenever 
possible. 

Typing  It  In 

1581  Directory  Sorter  is  written  in 
BASIC  and  may  be  entered  on  either 
the  64  or  the  128,  If  you  intend  to  use 
the  program  on  the  128,  you  should  en- 
ter it  in  128  mode  to  ensure  that  all  the 
lines  are  tokenized  correctly.  1581  Di- 
rectory Sorter  writes  directly  to  disk 
when  run,  so  it's  important  that  you 
type  in  the  program  carefully.  The  first 
time  you  test  the  program,  run  it  on  an 
unimportant  disk. 

To  get  started,  load  and  run  1581 
Directory  Sorter.  First,  the  program 
prompts  you  for  the  drive  number.  En- 
ter the  device  number  of  your  1581  or 
press  RETURN  to  accept  8  as  the  de- 
fault drive  number.  Next,  Directory 
Sorter  checks  the  disk  drive  to  see 
whether  it  is  a  1581,  This  step  is  impor- 
tant because  if  you  Vi^re  to  treat  a  disk 
formatted  on  a  1571  as  if  it  were  a  3'/2- 
inch  disk,  important  data  could  be  lost. 
If  the  drive  you've  selected  isn't  a  1581, 
the  program  warns  you  and  requests  a 
new  device  number.  You  can  enter  0  at 
this  prompt  to  exit  the  program. 
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This  enhanced  version  of 

"1581  Alphabetizer" 

(February  1989)  allows  you  to 

sort  your  1581  directories  in 

alphabetical  or  reverse 

alphabetical  order.  It  also 

offers  an  editor  that  allows 

you  to  place  files  in  any 

order.  For  the  64  and  128. 


Once  the  program  is  satisfied  that 
the  selected  drive  is  a  1581,  it  asks  for 
the  type  of  sort  you'd  like  it  to  perform 
as  it  reads  the  directory  from  the  disk. 
Press  A  to  sort  the  directory  in  alpha- 
betical order  (A-Z),  press  Z  to  sort  it  in 
reverse  alphabetical  order  (Z-A),  or 
press  M  to  read  the  directory  entries 
without  changing  their  order.  Each  time 
it  reads  a  directory  entry,  Directory 
Sorter  prints  a  dot  on  the  screen.  The 
program  enters  edit  mode  when  all  en- 
tries have  been  read. 

Rearranging 

In  edit  mode,  1581  Directory  Sorter 
shows  as  many  as  96  files  on  the  screen 
at  a  time  with  a  128  and  an  80-column 
monitor.  If  you're  using  a  64  or  a  128  in 
40-column  mode.  Directory  Sorter  dis- 
plays 48  files  at  a  lime.  If  the  disk  con- 
tains more  than  one  screenful  of  files, 
press  +  to  step  forward  through  the 
files  one  screen  at  a  time.  Press  —  to 
step  backward  through  the  files. 

At  the  top  of  the  screen,  you'll  see 
the  white  edit  cursor.  You  can  move  the 
cursor  with  the  up-,  down-,  left-  and 
right -cursor  keys.  Move  it  to  the  top  of 
the  current  column  by  pressing  T,  Press 
SHIFT-T  to  move  to  the  bottom  of  the 
current  column.  Press  CLR/HOME  to 
move  to  the  first  file  on  the  screen. 

To  move  one  or  more  files  to  a  new 
position,  move  the  edit  cursor  to  the 


first  file  and  press  G  (group).  The  white 
edit  cursor  changes  to  red  to  let  you 
know  you're  in  group  mode.  Press  the 
cursor-down  key  until  the  last  file  you 
wish  to  move  is  highlighted.  1/  you 
move  the  cursor  past  the  last  filename, 
the  program  displays  the  next  screen. 

Once  you've  selected  the  files  you 
want  to  move,  press  G  again.  The  files 
you  select  are  removed  from  the  list  and 
the  files  below  them  are  moved  up  to 
fill  in  the  empty  space.  The  edit  cursor 
now  changes  color  again.  Move  the  edit 
cursor  to  the  location  you  want  the  files 
moved  to.  If  the  cursor  is  in  front  of  the 
former  location  of  the  files,  it  becomes 
green,  if  it's  after  the  old  location,  it 
turns  gray.  Select  the  location  for  the 
files  and  press  G,  The  file  under  the  cur- 
sor and  the  ones  below  it  are  moved 
down;  the  files  that  you  picked  up  are 
placed  into  the  vacated  space,  and  the 
edit  cursor  turns  white  again. 

While  you're  in  group  mode  (the 
edit  cursor  is  green  or  gray),  you  can 
look  at  the  files  you've  picked  up  by 
pressing  F.  Directory  Sorter  displays 
the  old  directory  location  and  the  name 
of  each  of  the  files  you've  picked  up. 
Press  RETURN  to  look  at  more  of  the 
files  or  E  to  return  to  the  edit  screen.  If 
you  change  your  mind  about  moving 
the  files,  cancel  by  pressing  C. 

You  may  rearrange  files  in  any  or- 
der you  wish.  When  you're  satisfied 
with  the  order,  press  Q  to  exit  edit 
mode.  Note  that  you  cannot  exit  edit 
mode  if  you've  picked  up  files  without 
putting  them  down. 

Save  II? 

Once  the  directory  is  in  order,  1581  Di- 
rectory Sorter  asks  whether  you  would 
like  to  save  the  new  directory.  Up  until 
this  point,  everything  you've  done  has 
been  carried  out  in  memory.  If  you 
want  to  leave  the  disk  directory  un- 
changed, press  N.  Press  Y  to  write  the 
new  directory  and  validate  the  disk. 
See  program  listing  oti  page  83.      G 
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Shoppers  Mart 


G)VdATA-LABS       TISAR     128       BUSINESS  SOFTWARE 
REMARKABLE  CUSTOMER  DATA-BASE  !.  INVOICE  MANAGEMENT  SYSTEM! 


AHOY  7/88.    Or*  o1  It*  mosl  po*eTiLil  pfog'imi  ten  Wi  CM^ 

COVVOOOflE  11  ■"63      Cninces  srtf  yftj  *an?  Tt&AH 

Wntfl.flead.Pmi  Cuaiomiicd  inir&tct*  a  Recofdi- 

ua«r  Friendly  Prompt*  guide  rou  ttueugh  esch  furictisn. 

fiii  Co'o'  *  S^t^^s  500  Hocords/DisK  oo  ;571  Ojivo, 

Tr.K*;  ^3>e5  Of  Jots  Slfftus  estimates.  Dep!  Cod&S.  irtt . 

Sej".'^  C'0^5-W*'tJ-    Sort- Ma*ng  tft&ei.'*  Graphs.  n>jcfi  mor^ 

«0  C^tumni  ■  eack-Ug  Abk  •  FuB  Oocumenwtlofl 

Vtrijon  Z.3  rnciudii  Invtniory  control  fAS.OO 

&iirr#-d«v  ^i^CT  MCVISA  ot  COD  (ploaae  no  cJntCkii ) 


Call  orders  only  > 

24  hours  • 
1-800-537-UBS 


CW  DATA-LABS,  10610  Evans  St.,  Philadelphia,  PA  19116 


Atarisoft  Game  Cartridges 


Battlezone  -  Centipede  -  Defender  -  Donkey  Kong  -  Gataxian  -  Jungle  Hunt 
Gremlins  -  Moon  Palrol  ■  Ms.  Pac  Man  -  Pac  Man  ■  Pole  Position  -  Robotron 
$5.95  Each  or  Any  5  (or  $18.95 

ThQ  WrilB  Stiitf 
Word  Processof 

C-64  VBfSiOfl  $14.95 

C- 128  Version  S19  95 


Print  Shop 
Graphics 


Fot  Non  Commodore  Primers 

(Prinl  Shop  Disk  Side  A) 

V4G0  Graphics  per  Package 

S?-!  95  each  of  all  3  for  S59  9S 


(800) 347-6760 


BHE  SotE*a'«r     Dcpl  (1 

3S?  W  fiM'Did   Sjte  TOi 
l-fOSno.CA    53711 

Add  33  S/H  per  order 


FREE  P.D.  Software  Catalog 


.f: 
1 


■^ 


J- 


Tape 


ELECTRONiCS  AC/DC  CIRCUIT 
ANALYSIS  PROGRAM  $2d.95  Disk 
Computer  Heroes  iiU^ 

■  PO  Box  79A,  Depl.  231    ^^ 
Farmington,  CT  06034     0-64.  0120.  IBM  PC 
Orders  only  1-800-623-4070 

Prograni  computes  general  numeric  solution  to  electronic  circuit  of  up  to 
40  nodes  and  63  branches.  Branches  may  contain  resistors,  capacitors. 
Inductors,  current  sources,  voltage  sources  or  4  types  of  controlled  sources. 
Computer  displays  node  voltagos,  branch  voltages,  currents,  powers  and 
power  factors.  Step  function  of  branch  parameters  or  frequency  with  graphic 
display  of  results.  Menu  controlled  and  user  friendly. 


t^  can  design: 


EUECTRONIC  TECKHICIAKS, 
HOBBYISTS,  AND  ENGINEERS 


COMMODCHE  iiliJt 
lUkOO  SHACK  coco  t  •  3 

YES!  V*  accept 


Outside  CA  1-800-356-8113 
In  CA  (714)  657-4449 


•  POWEB  SUPPUCS 

•  juapunCRS 

•  FILTERS 

aryj 
•  LAYOUT  ciRcurr  aouura 
on  your  0-64  or  C-128. 

ENTER  you  itquavti  r^yiryoutpu!  i^xKifaiWfl  and  ffi*  rsjnjnA9r  dWTn  IH«  OfRJfl 
ELEVEN  oepirals  uiaf-trHmdlY.  Corrtfulaf  Akimi  tusngri  progf^mt  vM  h«lp  you  twtkj 
mi  cu51om  dwttfl  WfHB: 

FREE  WEASELOrUUWICS 

(KrUMd  aito  n«)l  79 

PO  80s  ?J16  £i.n  Cry  CA  &^jgi 


Eradicator 


f^'fw  Our  liO  Ftraauan  }a 

Stotk  TkAt  F.ftu  ^rottttian  fail! 

CiU  Uv  WriH  FiH  Ov  Fw  Ciubi 


lluiiu*.  And  Yeur 

SHUlKlm  If  OttVKrtndl 


in  SkEilUiMAriSluflMlWirAtallHrt. 

Trjas  Soft 

2H  W,  ntniiqn 
tlob\mio1i,Jtwmlli7t^ 

£rtftK«or  Vc^  ]  it  2  -  Om  lt»  Pwrnean  Ob  Ltcfa  [3b± TM  AJIct*  Yoo  T"  An±nt  Ya>  fwiiwiia  Tcki.  117.95  &. 

Ef  felwiGM  Miai-Ptk  #1 ,  R,  ^  t] .  FHUBH31  Fot  Ovs  20  Uf  Th<  Ln«t  JCckuti  On  Eocfa  Pu uncKr  DiiJl  - 112.93  El 

1^ 'O^EiuJ' Ptr butter  dOil.-K« far mce  -T^M  UlEimHB  AnL^Vkl  RErennCv  PfrlodkiL  ■  St^.Q)  ■  O  QukrUiSjr  Uli^  -  J9,Q3 

AdJ  »  OQ  p/K  ir^  FPfTt|Ji.TJ<  RwidiffiU  ^/'■S^  S^hTw   UPS  Ag  A  CYlQ  E^&i 


NOTHING  LOADS  YOUR  PROGRAMS  FASTER  THAN 

THE  QUICK  BROWN  BOX 
A  NEW  CONCEPT  IN  COMMOOOREiS  CARTRIDGES 


store  up  10  30  of  your  faranie  programs  in  a  single  batlery-baclted  cartridge  lor  easy, 

instant  access.  Ctaange  contents  as  oil  en  as  you  wi$r^   The  Quicii  Qtown  Box  accepts 

fiujsi  unprotected  and  "froien"  pro^r^ms  including  tne  only  wofd  processor  thai  sav&s 

your  lext  as  you  lype,  "The  Write  Slutf."  Coeicisls  with  GEOS©  arvd  Commodore  RAM 

Expansion  Units   Loader  uiililles  included  for  twth  0-64  and  C-12fi  modes. 

16K  $69:  32K  J99:  &JK  JIM  (pius  «  sfti;  MA  n»  add  51*4)  Call  toi  "Wrtle  Stutl"  pl!9. 

Brawn  Bcffles,  Inc  ,  26  Concord  Rd  ,  Bedford,  MA  01730:  (617)  275-0090;  862-3675 

"Good  Reliable  SluTt"  Mo  (Jan/feb  SS) 

"A  Little  Gem"  Twin  CiMS  1ZS  (Mar/Apr  ■88} 

"You'll  Nav«r  Lou  Your  Cool,  or  Your  Programa"  RUN  (Nov  87) 

"A  Worthy  Product— Long  Ovefdue"  Atioy  (Feb  88} 


C64     POWER  SUPPLY 

.     -■■■'-  '.■.■-  -rtRf  AHi,*f,CEPi!  [) 
300  Spud  Uod  am    SZ9. 


DEALtR  i/^ELCOME. 


PS01 


MAXTRON 

ia26A  DurfHO  Ai-e,  S  ElMonto.  CA91733       (818)350-5707      Siiiy.yJ) 


^^ 


ATTENTION  ROLE  PLAYERS 


•^^-1 


'^i 


Ip 


CHARACTER  EDITORS  ($19.95  each)  -  Might  and  Magic, 
Bards  Tale  (1,  2,  or  3),  Wasteland,  Ultima  (2,  3,  4  or  5), 
Wizardry  (1  or  2),  Pool  of  Radiance,  Neuromancer,  Elite, 
Phantasie  (1,  2  or  3)  and  Mars  Saga. 
HINT  BOOKS  (S9.95  each)  -  Wizardry  1,  Wizardry  2.  Migtit 
and  Magic,  and  Legacy  of  the  Ancients. 
M6  S3. 00  to  shipping/handling.  Specify  conrputer  type  on  order. 
GOSSELIN  COI^PUTER  CONSULTANTS       pSp 

P.O.  BOK  1083  ■  arrghton.  Ml  «116  •  (313)  229-2453  [5d 


Converl  vour  C&4/C128  to  a  DX7  with  the 


"h. 


SFX  SOUND  EXPANDER 


SFX  SOUND  EXPANDER 

•  vok*  dlgHal  tynttiMlnr  module 

SFX  FULL  SIZED  KEYBOARD 

SFX  COMPOSER  &  SOUND  EDITOR 

MIDI  compaiible  Mquancw  end  ednoi  tor  Sound  Expands 
Fawn  ft  Mualc,  SID  W.  Taylor  41114,  Sanu  Mat*,  CA  M4M 
Plwn*  »0(M4T-}4M     In  CA  MS-825-6Ma 


190.00 

$ao.oo 

$3000 


MAIL  TO: 

COMPUTEt'S  GAZETTE  SUBSCRIBER  SERVICE 

P.O.  Box  3251,  Harlan,  lA  51537 

Change  of  Address:  Please  advise  as  earty  as  possible.  Attach  label 
with  your  old  address  and  write  in  new  address  trelow. 
New  Subscriber  Fill  in  your  name  and  address  bebw.  Use  separate 
sheet  for  gift  orders. 


PLACE  LABEL  HERE 


Renewal:  Attach  label. 

One  year  $24.00 Tvyo  years  $45.00 

(Foreign  subscribers  piease  add  $6,00  per  year  for  postage) 


NAME 
STREET 


CITY/STATE/ZIP 


Please  bill  me . 


Payment  enclosed 


For  other  subscription  questions  or  prot^lems,  ptoase  write  a  note  and 
send  entire  form  to  the  above  address. 


SFX  Machine 


The  Commodore  64,  with  its  dedi- 
cated Sound  Interface  Device  (SID) 
chip,  has  long  been  known  for  its 
superior  sound  capabilities.  But  for 
most,  producing  sophisticated  sound 
effects  on  the  64  is  difficult  at  best. 
With  the  introduction  of  "SFX 
Machine,"  a  simple  sound-effects 
generator,  this  is  no  longer  the  case. 
Not  only  does  it  make  sounds;  SFX 
Machine  makes  them  up.  And  best 
of  all,  it  only  takes  a  single  keypress 
to  hear  each  one. 

Getting  Started 

Except  for  one  short  machine  lan- 
guage routine,  SFX  Machine  is  writ- 
ten entirely  in  BASIC.  Type  it  in 
using  "The  Automatic  Proofreader," 
found  near  the  back  of  this  issue.  Be 
sure  to  save  a  copy  of  the  program 
to  disk. 

To  use  SFX  Machine,  just  load 
and  run  it.  After  a  brief  pause,  the 
menu  screen  appears.  To  hear  a 
sound  effect,  turn  up  the  volume  on 
your  TV  set  or  monitor  and  press  the 
space  bar.  (The  effect  can  be  greatly 
enhanced  by  connecting  the  64's  au- 
dio output  to  a  good  amplifier.) 

Don't  like  the  sound?  Press  the 
RETURN  key  to  generate  another. 
Since  all  the  sounds  are  randomly 
generated,  some  will  be  more  im- 
pressive than  others. 

Saving  and  Loading  Sounds 

Once  you  hear  a  sound  you  like, 
you  can  save  it  to  disk  or  store  it  in 
memory  by  assigning  it  to  one  of 
the  number  keys.  To  save  a  sound, 
press  S;  then  press  K  for  keyboard 
or  D  for  disk. 

[f  you  press  K,  the  program  as- 
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Larry  Cotton 

Discover  the 
fantastic  potential  of 
the  SID  chip  with 
this  unusual  yet 
powerful  sound- 
effects  generator. 
Disk  drive  required. 


signs  the  sound  to  the  number  keys 
(1-9)  in  sequential  order  and  then 
returns  you  to  the  main  menu 
screen.  The  status  bar  {shown  in  in- 
verse) on  the  right  side  of  the  screen 
tells  you  which  keys  have  sounds. 
The  status  bar  on  the  left  tells  you 
which  sound  you're  currently  hear- 
ing. To  review  any  numbered 
sound,  press  the  appropriate  num- 
ber key,  then  the  space  bar.  Once 
you've  assigned  sounds  to  all  the 
number  keys,  the  next  save  you 
make  automatically  goes  to  disk. 

If  you  choose  to  save  sounds  to 
disk,  the  program  requests  a  file- 
name for  the  sound  effect.  Enter  a 
filename  that  is  16  characters  or  less 
in  length.  Enter  $  to  look  at  a  direc- 
tory of  the  disk.  Be  careful  when 
using  the  disk,  since  SFX  lacks  error 
checking. 

To  reload  a  sound  from  disk, 


press  L  from  the  main  menu.  As 
with  saving  sound  effects,  the  pro- 
gram requests  a  filename.  Enter  the 
name  of  the  file  you  want  to  load  or 
$  to  view  the  disk  directory. 

Pitcli  Controi 

SFX  Machine  allows  you  to  adjust 
the  pitch  of  any  sound.  To  raise  or 
lower  the  pitch  of  a  sound,  press  + 
or  — ,  respectively.  Note  that  some 
sounds  don't  change  much  when 
you  alter  the  pitch. 

Pitch  is  always  saved  as  part  of 
the  sound.  Simple  tunes  can  be 
composed  with  one  sound  effect  by 
changing  the  sound's  pitch  and  as- 
signing it  to  several  different  keys. 

To  repeat  a  single  sound  indef- 
initely, press  R  (you  can  also  hold 
down  the  space  bar).  As  you'll  dis- 
cover, some  sounds  take  on  unpre- 
dictable characteristics  when 
played  continuously.  To  stop  a  con- 
dnuous  sound,  press  any  key. 

Where  tlie  Sounds  Are 

The  Commodore  64  can  play  up  to 
three  voices  simultaneously.  The 
basis  for  most  of  the  sounds  created 
by  SFX  Machine  sounds  is  that 
voices  1  and  2  play  together,  at 
times  slightly  detuned  and/or  mod- 
ulated by  voice  3.  Complex  wave- 
forms are  created  by  combining  the 
norma!  ones — -triangle,  sawtooth, 
square,  and  noise — while  adding 
ring  modulation,  synchronization, 
or  a  combination  of  these. 

Since  all  the  sounds  are  ran- 
domly created,  the  results  are  un- 
predictable and  often  better  than 
those  deliberately  created. 
See  program  listing  on  page  71.     6 
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64  Tips  anti 
t57t  ROMs 


Randy  Thompson 

"The  Programmer's  Page"  is 
interested  in  your  programming 
tips  and  tricks.  Send  all  submis- 
sions to  The  Programmer's  Page, 
COMPUTEl's  Gazette,  P.O.  Box 
5406,  Greensboro,  North  Carolina 
27403.  We'll  pay  $25'$50  for  each 
tip  ive  publish. 

I  recently  received  a  letter  asking 
for  a  64  version  of  a  tip  published  in 
the  May  1989  "Programmer's  Page," 
In  this  tip,  Anderson  N.  Cadell  ex- 
plained hov/  you  can  make  your 
BASIC  128  programs  automatically 
run  when  loaded.  With  128  and  64 
memory  maps  at  my  side,  I  came  up 
with  a  solution. 

•  Add  the  following  line  to  the  be- 
ginning of  your  program: 

0  POKE  43,l:POKE  44,8iPOKE 
770,131:FOKE  771,164 

•  With  your  program  in  memory, 
enter  these  commands  and  press 
RETURN: 

PRINT"{CLR}":POKE43,3:POKE44,3 
:FOKE770,113:FOKE771,168:POKE 
l37,0:SAVV."fiIeiiame",S 

•When  READY  flashes  at  the  top  of 
the  screen,  turn  your  computer  off 
and  then  on  again.  Now,  entering 
the  command  LOAD  "filename",B,l 
will  cause  your  program  to  load  and 
run  automatically.  If  you  wish  to 
have  the  RUN/STOP-RESTORE 
key  combination  disabled  as  well, 
remove  the  last  two  POKEs  in  line  0. 

Unwanted  Lines 

If  you  don't  own  a  utility  that  al- 
lows you  to  erase  a  range  of  BASIC 
lines,  Helen  Roth  of  Los  Angeles, 
California,  has  an  easy  solution. 

Load  the  program  that  contains 
the  lines  you  wish  to  delete  and  en- 
ter the  command  POKE  774,0.  Now, 
LIST  the  lines  you  want  to  remove. 
For  example,  to  delete  lines  250- 
300,  enter  LIST  250-300,  The  line 
numbers  will  list  to  the  screen,  but 


the  lines'  text  will  not.  Position  the 
cursor  on  the  first  line  number  and 
continue  to  press  RETURN  until 
you've  run  the  cursor  over  all  the 
lines  you  want  to  get  rid  of,  (This 
method  works  best  when  you're  de- 
leting 23  or  fewer  lines,  since  addi- 
tional line  numbers  will  scroll  off  the 
screen.)  Enter  POKE  774,26:LIST  to 
view  your  program— less  the  de- 
leted lines,  of  course. 

64  UnNEW 

This  next  tip  was  sent  in  by  Robert 
Crisafio  of  Queens  Park,  West 
Australia.  To  resurrect  a  BASIC 
program  after  you've  typed  NEW 
or  reset  the  computer,  enter  the 
following  two  commands: 

POKE  2050,8 
SYS  42291 

Now  be  sure  to  save  your  program 
so  you  won't  have  to  use  this  tip 
again. 

1571  Update 

Queries  and  information  about  the 
1571  and  its  ROMs  just  keep  pour- 
ing in.  There  seems  to  be  a  lot  of 
misinformation  floating  around  out 
there,  and  my  mistakes  in  previous 
"Programmer's  Page"  columns 
haven't  helped  any,  either.  With 
the  aid  of  some  Commodore  tech- 
nicians, knowledgeable  user 
groups,  and  many  of  you,  I  think 
we  can  finally  clear  this  whole 
thing  up. 

According  to  Mark  E.  Odel),  a 
technician  at  an  authorized  Com- 
modore service  center,  there  are 
only  three  versions  of  ROM  for  the 
1571.  These  chips  are  numbered 
310654-01,  310654-03,  and 
310654-05,  with  310654-05  being 
the  latest  revision.  The  ROM  chip 
that  bears  these  numbers  is  hidden 
under  the  disk  drive's  power  sup- 
ply, near  the  back  of  the  unit. 

The  most  accurate  method  of 
determining  which  ROM  you  have 
is  to  open  up  your  disk  drive  and 
look.  Realizing  that  this  isn't  the 


most  desirable  method,  Mr.  Odell 
and  reader  W.  Anthony  Marsh  sent 
in  programs  that  PEEK  the  drive's 
ROM  to  check  which  version  you 
have,  Mr.  Odell's  program,  listed  as 
Program  1,  is  1571 -specific.  Pro- 
gram 2,  supplied  by  Mr.  Marsh,  is 
in  the  public  domain.  Written  by  F. 
Bowen,  Program  2  detects  the 
ROMs  for  1541s  and  1581s  as  well 
as  those  for  1571s. 

To  use  either  program,  simply 
type  it  in,  save  it  to  disk,  and  then 
run  it.  In  the  case  of  Program  1,  a 
DOS  ROM  revision  of  -01  or  -03 
signifies  that  your  1571  has  the  old 
ROMs  (-05  is  the  latest  upgrade). 
Program  2  asks  which  unit  you 
wish  to  test  (8-11)  and  then  tells 
you  which  type  of  drive  you  have — 
1541,  1571,  or  1581— and  whether 
or  not  you  need  an  upgrade.  A 
1571  cr,  by  the  way,  is  the  128D's 
internal  drive.  Mr.  Odell  says  that 
he  knows  of  two  different  128D  in- 
ternal drive  ROMs,  numbered 
318047-01  (old  version}  and 
252372-01  (new  version).  At  pre- 
sent, he  doesn't  know  the  differ- 
ences between  the  ROMs  or  how  to 
detect  them  via  software. 

We  don't  have  every  type  of 
1571  here  at  COMPUTE!,  so  we 
were  unable  to  test  Program  1  thor- 
oughly. However,  we  can  say  that  it 
works  on  all  the  1571s  that  we  do 
own.  Program  2  seems  fairiy  reli- 
able, but  it  did  fail  to  recognize  two 
of  our  older  Commodore  drives. 

As  a  point  of  interest,  you 
might  read  Gazette's  June  1989 
"Horizons"  column.  There's  a  ru- 
mor that  the  1571  has  reached  re- 
tirement age  and  is  about  to  be 
pulled  from  Commodore's  produc- 
tion line.  (It  appears  that  Commo- 
dore won't  be  doing  any  more  1571 
upgrades,)  "Horizons"  columnist 
Rhett  Anderson  has  an  interesting 
discussion  on  this  and  another  seem- 
ingly ill-fated  Commodore  product. 
Read  it  and  see  what  you  think. 
See  program  listings  on  page  76.    G 
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BASIC 

khfimiRrs 


Larry  Cotton 

It's  not  often,  in  this  column,  that 
we've  focused  on  just  one  com- 
puter. Our  discussions  usually  en- 
compass the  128,  64,  Plus/4,  and 
16.  However,  for  the  next  couple  of 
months,  I'd  like  to  concentrate  on 
two  important  BASIC  keywords, 
POKE  and  PEEK,  on  my  favorite 
machine,  the  Commodore  64. 

POKE  (a  statement)  and  PEEK 
(an  integer  function)  are  an  integral 
part  of  most  BASiCs.  These  key- 
words do  nothing  by  themselves — 
but,  when  followed  by  the  right 
numbers,  they  can  be  powerful 
tools  for  the  BASIC  programmer. 

Some  Rules  of  Usage 

We've  casually  used  POKE  before 
on  the  64: 

10  POKE  S3Z80,0:POKE  53281,0 
:POKE  646,1 

This  line  changes  the  border 
and  background  colors  of  your 
screen  to  black  and  the  cursor  to 
white.  The  number  immediately  fol- 
lowing the  POKE  statement  is  a 
memory  location  in  the  computer; 
the  number  after  the  comma  is  a  val- 
ue that  is  stuffed  into  that  location. 

POKE  is  used  to  change  the 
contents  of  the  computer's  internal 
memory — known  as  RAM,  or  ran- 
dom access  memory.  When  you  first 
switch  on  a  computer,  each  memo- 
ry location  contains  a  certain  value 
(called  a  defauit  value),  some  of 
which  are  preprogrammed  at  the 
factory.  Most  memory  locations  can 
be  altered  with  the  POKE  statement. 

PEEK,  in  a  sense,  is  the  oppo- 
site of  POKE;  it's  used  to  examine 
the  contents  of  the  computer's  in- 
ternal memory.  As  we'll  see  in  the 
coming  months,  the  values  you 
PEEK  can,  in  turn,  be  POKEd  else- 
where. 

Certain  memory  locations,  such 
as  those  which  control  the  comput- 
er's sound-generating  voices,  can 
only  be  POKEd,  or  written  to.  Oth- 
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ers — also  in  the  sound  area — can 
only  be  PEEKed,  or  read.  The  con- 
tents of  any  memory  location  can 
range  from  0  to  255.  If  you  attempt 
to  POKE  a  value  outside  this  range 
into  memorv,  vou'U  get  an  ILLE- 
GAL QUANTITY  ERROR  message. 

A  SID  Exuerlencs 

Since  the  memory  locations  in  the 
SID  chip — the  part  of  the  computer 
which  creates  sound  —  can  be 
POKEd  or  PEEKed,  it  seems  like  a 
good  place  to  experiment.  The  SID 
chip's  memory  locations  (also 
called  control  registers)  are  located 
at  locations  54272  through  54300. 
Locations  54272-54296  can  only  be 
POKEd;  locations  54297-54300  can 
only  be  PEEKed. 

Let's  begin  our  experiment  by 
clearing  the  screen.  Hold  down 
SHIFT  and  press  the  CLR/HOME 
key,  The  cursor  should  be  in  the 
home  position — the  extreme  upper 
left  corner  of  the  screen. 

Next,  clear  the  SID  chip's 
memory  by  setting  its  first  25 
"POKEabie"  control  registers  to  0. 
We'll  do  that  with  a  simple  FOR- 
NEXT  loop; 

FOR  J  =  54272  TO  54296:POKE  J,0:NEXT 

(As  you  type  in  these  lines,  be 
sure  to  press  RETURN  at  the  end  of 
each  line.  You're  in  immediate 
mode — no  program  line  numbers — 
so  the  computer  will  respond  im- 
mediately after  you've  pressed  RE- 
TURN, Also,  leave  these  lines  on 
the  screen  because  we'll  change 
them  later.  Don't  clear  the  screen.) 

The  next  line  sets  the  volume 
(loudness)  control  register  to 
maximum: 
POKE  54296,15 

The  volume  level  can  range  from  0 
to  15.  (Values  above  15  affect 
things  other  than  loudness.) 

When  you  press  RETURN  on 
this  line,  it  executes  and  the  loud- 
ness level  is  set.  You  won't  hear 
much  yet  because  you  haven't  set 
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any  of  the  other  parameters  re- 
quired to  play  a  note.  If  your  moni- 
tor's volume  has  been  turned  up, 
you  may  have  heard  a  small  click  or 
pop  as  the  SID  chip's  volume  con- 
trol register  jumped  from  off  (0)  to 
full  volume  (15). 

Here's  the  Pitch 

Now  we'll  set  the  pitch.  (An  ex- 
ample of  pitch:  A  siren's  sound  al- 
ternately rises  and  falls  in  pitch 
while  maintaining  a  relatively  con- 
stant loudness.)  Any  value  from  0 
to  255  can  be  POKEd  there;  the 
higher  the  number,  the  higher  the 
pitch.  A  value  of  30  produces  a 
pleasant  pitch.  Enter  this: 
POKE  54273,30 

Location  54273  is  just  one  of 
the  six  registers  which  control  the 
SID  chip's  pitch.  The  Commodore 
64  is  blessed  with  three  separate 
voices;  the  pitch  and  other  charac- 
teristics of  each  voice  can  be 
controlled  independently.  We'll 
work  only  with  voice  1.  Location 
54273  controls  the  "coarse"  pitch  of 
voice  1. 

Now  enter  this  line,  which  I'll 
explain  later: 
POKE  54275,8 

The  ADSR  Envelope 

We'll  next  work  with  two  tricky 
registers  called  the  envelope  control 
registers.  The  envelope  of  a  sound 
is  its  loudness  plotted  against  time, 
It  runs  from  the  first  instant  you 
hear  the  sound  until  it  dies  out  (see 
Figure  1),  The  envelope  is  divided 
into  four  parts — attack,  decay,  sus- 
tain, and  release  (sometimes  abbre- 
viated ADSR), 

Enter  this  line,  which  sets  at- 
tack and  decay: 

POKE  54277,12 

The  attack/decay  value  controls 
how  fast  the  note  will  reach  a  par- 
ticular loudness  level  and  how  fast 
the  loudness  will  drop  to  the  sus- 
tain level. 


Figure  1.  sound  Env8loiia 
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POKE  54276,y 
128/54/32/16 


/ 

POKE  54276^ 
/■=  129/65/33/17 

Now  set  the  sustain  and  release: 

POKE  54278,90 

If  you've  been  entering  these 
lines,  you're  about  to  be  rewarded 
with  a  sound.  (Up  to  this  point, 
we've  only  set  parameters  neces- 
sary for  a  sound  to  be  heard.) 

Gating  the  Sound 

Type  this  line  and  press  RETURN: 

POKE  54276,33 

You  should  hear  a  sound. 

The  sound  you  hear  has  been 
triggered  (or  gated)  by  POKEing  a 
33  in  control  register  54276,  initiat- 
ing the  attack/decay/sustain  cycle. 
You  are  listening  to  the  sound's 
sustain-level  loudness.  It  will  stay 
at  this  level  until  you  type  the  next 
line  and  press  RETURN: 

POKE  54276,32 

This  turns  the  note  off.  How 
fast  the  note  dies  out  is  called  the 
release  phase  of  the  envelope.  Sus- 
tain and  release  were  set  by  POKE- 

Flgure  2.  waveforms 


Time 


■> 


ing  54278  with  90,  above. 

When  you  hear  a  song  being 
played  on  the  64,  the  loudness  and 
ADSR  values  are  usually  set  only 
once  at  the  beginning.  All  that's  left 
to  do  is  to  control  the  pitch  and  the 
note  durations. 

Sound  Affects 

The  memory  registers  you  have 
POKEd  will  retain  their  values  until 
you  change  them  or  turn  the  com- 
puter off.  So  let's  change  some. 

Move  the  cursor  up  to  POKE 
54276,33  and  press  RETURN.  You 
should  hear  the  note  sound  again. 
While  listening  to  it,  move  the  cur- 
sor up  to  the  line  that  reads  POKE 
54273,30,  which  sets  the  pitch.  Po- 
sition the  cursor  over  the  3  in  30 
and  type  another  value  between  0 
and  255;  then  press  RETURN.  You 
are  using  POKE  again  to  change  the 
contents  of  memory  register  54273, 
or  the  note's  pitch.  Try  moving  the 
cursor  to  other  lines,  POKEing  vari- 
ous values  into  the  control  registers 


and  observing  the  results. 

Register  54276  reacts  only  to 
some  very  specific  values.  {These 
values  can  be  found  in  the  User's 
Guide  or  the  Programmer's  Reference 
Guide.)  This  register  not  only  turns 
the  note  on  and  off,  but  it  also  con- 
trols a  voice's  waveform,  or  how  a 
note  sounds.  You've  heard  the 
sound  of  only  one  of  the  64's  four 
waveforms — the  sawtooth  wave.  To 
hear  the  triangle  waveform,  POKE 
17  into  54276  to  turn  it  on  and  16  to 
turn  it  off.  Do  the  same  for  the  noise 
waveform  with  129  and  128  (see 
Figure  2). 

There's  one  more  waveform 
which  the  64  possesses — the  pulse 
wave.  It's  turned  on  by  POKEing  65 
to  54276.  This  voice  would  not  be 
audible  if  we  had  not  entered  POKE 
54275,8  above.  That  POKE  sets  the 
shape  of  the  pulse  wave  to  an  audi- 
ble value.  Try  POKEing  various 
values  into  54275.  To  hear  the  re- 
sults of  your  experiments,  always 
follow  with  POKE  54276,65  and 
POKE  54276,64. 

Hear's  a  mind-boggier:  Since 
the  envelope  control  registers 
54277  and  54278  can  each  be 
POKEd  with  values  from  0  to  255, 
there  are  a  possible  65,536  settings 
for  a  sound's  envelope!  The  attack 
and  sustain  portions  are  increment- 
ed by  16  from  0  to  240;  the  decay 
and  release  portions  are  increment- 
ed by  1  from  0  to  15. 

Next  month,  we'll  see  how  we 
arrived  at  the  values  POKEd  in 
54277  and  54278,  respectively,  and 
how  you  can  determine  which  val- 
ues to  POKE  to  achieve  the  ADSR 
you  want  to  hear.  6 


POKE  54276,33 
(Sawtooth) 


POKE  54276,17 
(Triangle) 


POKE  54276,129 
(Noise) 


POKE  54276,65 

POKE  54275,B 

(Pulse) 
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Sim0e  ML  Music 


Jim  Butterfleld 

On  the  64,  whether  you  program  in 
BASIC  or  in  machine  language,  you 
make  music  the  same  way — with 
the  SID  chip.  When  it  comes  to  pro- 
gramming sound,  what  gives  ma- 
chine language  the  edge  is  its 
inherent  speed.  Since  ML  is  so  fast, 
there's  plenty  of  time  for  special  ef- 
fects such  as  vibrato  (pulsating  the 
frequency  to  add  richness  to  the 
sound). 

Before  tackling  any  sophisti- 
cated techniques,  though,  you'll 
want  to  make  sure  you  understand 
the  basics.  This  month,  we'll  exam- 
ine the  simplest  possible  coding 
scheme  for  ML  music — -one  voice, 
no  special  effects. 

Two  for  One 

The  program  that  accompanies  this 
column  POKEs  a  machine  language 
music  player  into  memory.  Also 
provided  within  the  program  (in 
REM  statements)  is  the  equivalent 
BASIC  code.  Music  data  for  the  first 
few  lines  of  "Three  Blind  Mice" 
completes  the  listing.  If  you  like, 
you  can  add  to  the  code  to  finish  the 
tune,  or  you  can  write  your  own 
music. 

As  in  BASIC,  our  first  task  is  to 
turn  up  the  master  volume  control. 
BASIC  does  this  with  POKE 
54296,15.  In  our  ML  program, 
which  we  locate  at  $2000  (8192 
decimal),  we  use 

2000     LDA    #$0F 
2002    STA    $D418 

If  you're  up  on  hexadecimal 
notation,  you  know  that  $0F  is  deci- 
mal 15,  and  address  $D418  is  deci- 
mal 54296.  Same  task,  different 
language. 

The  next  item  is  to  set  the  enve- 
lope: the  attack,  decay,  sustain,  and 
release.  In  BASIC,  we  set  voice  1 
values  by  POKEing  locations  54277 
and  54278  with  the  appropriate 
values.  In  ML,  we  do  the  same; 
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2005    LDA    #$2S 
2007     STA     $D40S 
IMA    LDA    #SOC 
200C    STA    SD406 

Note  that  when  we  use  hexa- 
decimal, we're  able  to  read  the  vari- 
ous components  directly  from  the 
hex  value.  Hexadecimal  25  for 
attack/decay  means  an  attack  of  2, 
a  decay  of  5.  Once  you  get  accus- 
tomed to  it,  you'll  find  hexadecimal 
much  easier  to  use  in  this  applica- 
tion than  decimal. 

Since  our  tune  may  be  long — 
much  longer  than  256  bytes — -we 
can't  scan  through  the  notes  using 
simple  index  addressing.  To  get 
greater  reach,  we  set  up  an  indirect 
address,  located  in  zero  page  at  SFC 
and  SFD,  that  points  to  our  music  at 
address  $2800  (decimal  10240): 

200F  LDA  #$28 

2011  STA  $FD 

2013  LDA  #$00 

2015  STA  SFC 

Good  Timing 

Each  note  is  stored  as  three  data 
values:  a  duration  byte  and  two  fre- 
quency bytes,  low  and  high  byte, 
respectively.  Using  the  duration 
byte,  we  first  check  the  note  timing. 
If  it's  0,  it's  time  to  turn  off  the  vol- 
ume and  quit. 

2017     LDY    #S0O 
2019    LDA    (SFC),Y 
201B    BEQ    $2aSE 

Otherwise,  we  calculate  future 
times:  when  to  start  the  note's  re- 
lease cycle  (after  four  jiffies)  and 
when  to  go  get  the  next  note 
(whenever  the  duration  has 
elapsed).  The  two  times  are  stored 
at  addresses  $2701  and  $2700,  re- 
spectively. We  use  the  low-order 
byte  of  the  TI  jiffy  dock  (at  $A2)  as 
our  timer.  There's  a  coding  fine 
point  involved  with  this  time  check; 
we'll  discuss  it  in  a  moment. 


201D  CLC  (add  delay  to  TI . 

201E  ADC  SA2 

2020  STA    $2700  ( ...  and  store) 

2023  CLC  (add  4  jiffies  . . . ) 


.) 


2024     LDA    SA2     ( . .  .  to  TI , . . ) 

2026    ADC  #$04 

2028    STA    $2701  ( ...  and  store) 

Register  Y  serves  as  our  indi- 
rect address  extension.  With  it,  we 
can  reach  into  the  three-byte  data 
grouping  to  get  the  proper  value. 
(The  instruction  at  $2017  initializes 
Y  to  0.)  After  fetching  the  note's  du- 
ration, we  dig  out  its  frequency — 
first  the  low  byte,  then  the  high 
byte — and  store  these  values  in  the 
appropriate  SID  chip  registers. 

202B  INY 

202C  LDA  ($FC),Y 

202E  STA  $0400 

2031  INY 

2032  LDA  ($FC),Y 
2034  STA  $0401 

Next,  we  start  the  attack/ 
decay/sustain  cycle  for  the  note.  In 
about  four  jiffies,  we  begin  the  re- 
lease cycle  so  the  note  continues  to 
sound  for  a  while. 

3037    LDA    #Sn    (start  note) 

2039  STA  $0404 
2d3C  LOA  $2701 
203F    CMP  $A2 

2041    BPL     $203F  {wait  4  jiffies) 

2043    LDA    #$10 

2045    STA    $D404  (start  release  cycle) 

2048     LDA    $2700 

204B    CMP  $A2 

2040  BPL     $204B  (wait  the  duration) 
When  the  note's  time  is  up,  we 

go  back  for  a  new  one  and  do  it  all 
again.  In  the  process,  we  bump  the 
note  pointer  along,  three  bytes  at  a 
time,  to  the  next  note  grouping. 

204F  CLC  (update  pointer) 

2050  LDA  $FC 

2052  ADC  #$03 

2054  STA  $FC 

2056  LDA  $FD 

2058  ADC  #S0O 

205A  STA  $FD 

20SC  BCC  $2017  (gel  the  next  note) 

205E  LDA  #$00 

2060  STA  $0418  (turn  off  volume  . . . ) 

2063  RTS  ( , . .  and  exit) 

When  Is  Less  More? 

Now  for  the  timing  question.  The 
jiffy  timer  could  go  "over  the 
top" — that  is,  it  could  wrap  around 
to  0.  Suppose  the  clock  were  at  val- 
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ue  250  and  we  wanted  to  calculate 
ahead  20  jiffies.  The  total  would  be 
14,  not  270;  that's  too  big  for  a 
single-byte  nunnber.  Suddenly,  our 
ideas  of  greater  than  and  less  than 
need  revising. 

It's  like  the  puzzle:  Is  October 
before  February?  Answer:  Yes  and 
no.  In  practical  terms,  the  answer  is 
yes,  since  there  are  fewer  months 
going  from  October  to  February 
than  vice  versa.  But  here  we  have  to 
adjust  our  approach  to  testing  for 
bigger  and  smaller. 

Amazingly,  there's  a  simple 
way  to  do  this  on  the  6510.  Do  a 


comparison  the  usual  wav — using 
CMP,  CPX,  or  CPY.  After  the  com- 
parison, the  N  flag  tells  us  which 
way  around  the  loop  is  shorter. 
When  this  flag  is  used,  $A0  is 
greater  than  $60  (which  you  might 
expect),  and  $45  is  greater  than  SFF 
{which  you  might  NOT  expect).  For 
normal  comparisons,  the  N  flag  is 
useless.  But  for  this  wraparound 
test,  it's  ideal.  So  we  use  it  for  each 
delay  loop. 

Because  of  the  delay  loops, 
most  of  the  time  the  program  just 
sits  as  the  SiD  chip  plays.  These 
pauses,  though,  give  you  the  oppor- 


tunity to  execute  sound-enriching 
routines.  Now  that  you've  got  the 
basics  down,  all  you  need  to  do  is  to 
write  the  code. 


Three  Bl'mi  Mice 

PC  10  HEM  ML  PROGRAM  DATfi 

BG  20  DATA  169,15,141,24,212,1 

69,37,141,5,212,169,12,1 

41,6,212 
AA  30  DATA  169,40,133,353,169, 

0,133,2  52,160,0,17  7,252, 

240,65 
DP  40  DATA  24,101,162,141,0,39 

,24,165,162,105,4,141,1, 

39 
CH  SO  DATA  200,177,252,141,0,2 

12,200,177,252,141,1,212 
XJ  60  DATA  169,17,141,4,212,17 

3,1,39,197,162,16,252,16 

9,16,141,4,212 
DE  70  DATA  17  3,0,39,197,162,16 

,252,24,165,252,105,3,13 

3,252 
JX  aa  DATA  165,253,105,0,133,2 

53,144  , IBS, 169, 0,141, 24, 

212,96 
DK  90  FORJ=8192T08291:READX:T= 

T  +  X:P0KEJ,X!NEXT:  IFT012 

359THENSTOP 
GK  100  REM  MUSIC  DATA  (DURATIO 
N,  LO-BYTE  FREO, HI-BYTE 
FREO) 
BS  110  DATA  30,31,21 
XR  120  DATA  30,209,18 
JS  130  DATA  6(5,195,16 
EA  140  DATA  30,31,21 
PX  150  DATA  30,209,18 
FA  160  DATA  60,195,16 
JG  170  DATA  30,30,25 
SS  180  DATA  15,96,22 
KB  190  DATA  15,96,22 
OH  200  DATA  60,31,21 
HK  218  DATA  30,30,25 
SA  220  DATA  15,96,22 
MD  230  DATA  15,96,22 
XK  240  DATA  120,31,21 
PF  250  DATA  0,0,0 
BF  260  P=10240 
CG  270  READ  A,B,C 
CK  2B0  POKE  P,A:POKE  P+1,B:P0K 

E  P+2,C 
FG  290  P=P+3 
AA  300  IF  AO0  THEN270 
FF  310  SYS  8192 
DB  320  REM  HERE  IS  A  BASIC  EQU 

IVALENT 
KR  330  REM  ...TO  THE  M/L  PROGR 

AM 
HA  34  0  REM  POKE  54296,15 
AE  350  REM  POKE  54277,32+  5 
PD  360  REM  POKE  54278,12 
DG  370  REM {4  SPACES  J  MUSIC  LOOP 

S  HERB 
HP  380  REM  READ  T,L,H 
XD  390  REM  IF  T=0  GOTO  1170 
PM  400  REM  TX=TI 
PB  410  REM  TA=TX+T 
GJ  420  REM  POKE  54272 , Li  POKE  5 

4273, H 
JP  430  REM  POKE  54276,17 
RS  440  REM  IF  TKTX  +  5  GOTO  112 

0 
SP  450  REM  POKE  54276,16 
RG  460  REM  IF  TKTA  GOTO  1140 
JP  473  REM  GOTO  1060 
XH  4Ba  REM(4  SPACES)MUSIC  QUIT 

S  HERE 
AC  490  REM  POKE  54296,0       G 

COMPUTEIS  Gazette    Juiy  1989    55 


THE 


pKJsiiDn 


File  Betriever 


John  F.  Howard 

Recover  all  the  files  you  thought 
loere  deleted  from  your  GEOS 
disks.  Works  with  any  Commo- 
dore drive,  including  1541s, 
1571s,  1581s,  and  RAM  expan- 
ders. Runs  under  GEOS  or 
GEOS  J  28,  versions  1.3  and  higher. 

In  the  December  1987  issue  of 
COMPUTEI's  Gazette,  we  published 
'Trash  Restorer,"  a  utility  which  al- 
lows you  to  recover  a  file  that  has 
been  thrown  into  GEOS's  trash 
basket.  Since  that  time,  GEOS  has 
gone  through  several  upgrades; 
"File  Retriever"  brings  Trash  Re- 
storer up  to  date. 

File  Retriever  lets  you  recover 
GEOS  and  standard  Commodore 
files  that  have  been  removed  from 
the  disk  either  by  being  scratched 
(Commodore  files)  or  by  being 
thrown  into  the  trash  basket  {GEOS 
files).  It  works  with  all  three  Com- 
modore drive  types:  1541, 1571,  and 
1581.  It  also  works  with  the  1750 
and  1764  RAM  Expansion  Units 
(REU)  that  are  used  as  RAM  drives. 
File  Retriever  is  more  powerful  than 
GEOS  2.0's  UNDO  DELETE  func- 
tion because  it  can  restore  every  de- 
leted file  on  the  disk— not  just  the 
last  file  deleted.  However,  File  Re- 
triever can't  retrieve  files  from  a  disk 
that  has  been  erased  using  GEOS 
2,0's  disk-erase  command. 

Typing  It  In 

Program  1,  File  Retriever,  is  written 
in  machine  language.  Type  it  in 
using  "MLX,"  the  machine  lan- 
guage entry  program  found  else- 
where in  this  issue.  When  MLX 
prompts  you,  respond  with  the  val- 
ues given  below. 

Starling  address:     $1503 
Ending  address:      $1EB2 

Once  you've  entered  the  data  for 
program  1,  be  sure  to  save  it  on  a 
GEOS  work  disk  with  the  filename 
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FILERET.  We'll  use  Program  2, 
"GeoConverter,"  to  convert  it  to 
GEOS  format.  Save  a  second  copy 
with  the  name  FILERETRIEVER, 
This  copy  is  a  backup  to  use  if 
something  goes  wrong. 

If  you  don't  already  have  Geo- 
Converter on  disk,  type  in  program 
2.  Use  "The  Automatic  Proofread- 
er" to  prevent  typing  mistakes  when 
you  enter  this  program.  Save  a  copy 
of  GeoConverter  to  the  GEOS  work 
disk  that  contains  Program  1. 

Now,  run  Program  2.  You'll  be 
prompted  for  a  filename.  Enter  the 
name  FILERET.  GeoConverter  con- 
verts the  machine  language  file  into 
an  executable  GEOS  file, 

Using  the  Program 

To  use  File  Retriever,  double- click 
the  FILERET  icon.  The  program 
clears  the  screen  and  displays  the 
startup  screen, 

File  Retriever  has  two  menus: 
File  and  Retrieve.  From  the  File 
menu,  you  can  display  the  infor- 
mation box  or  return  to  the  desk- 
Top,  The  Retrieve  menu  has  an 
option  for  retrieving  GEOS  files 
and  non-GEOS  files. 

To  begin  retrieving  deleted 
files,  select  the  type  of  files  you 
want  to  search  for  from  the  Retrieve 
menu.  File  Retriever  displays  a  dia- 
log box  and  asks  if  you  want  to  re- 
trieve files  from  the  currently  acHve 
disk  drive.  The  dialog  box  contains 
the  name  of  the  disk  (or  the  RAM 
drive  name)  and  several  icons.  The 
number  and  type  of  drives  installed 
on  your  system  determine  which 
icons  are  displayed. 

If  you  click  the  DISK  icon,  the 
computer  prompts  you  to  insert  an- 
other disk  into  the  active  drive.  This 
icon  will  not  appear  if  the  currently 
open  drive  is  a  RAM  drive.  The 
DRIVE  icon  allows  you  to  toggle 
between  drive  A  and  B  on  a  two- 
drive  system.  This  icon  will  not  ap- 
pear if  you  have  only  one  drive 


attached  to  your  system.  The  CAN- 
CEL icon  returns  you  to  the  opening 
screen  without  searching  for  files. 

When  you  click  the  YES  icon, 
File  Retriever  searches  for  files  on 
the  disk  you  have  selected.  If  it 
finds  a  deleted  file  that  can  be  re- 
trieved, it  displays  a  dialog  box  con- 
taining the  name  of  the  file  and  asks 
if  you  want  to  retrieve  it.  Click  on 
the  YES  button  to  retrieve  the  file 
and  continue  searching.  Click  on 
NO  to  leave  the  file  as  is  and  con- 
finue  searching.  If  you're  retrieving 
non-GEOS  files.  File  Retriever  dis- 
plays another  dialog  box  asking  for 
the  Commodore  file  type  of  the  file 
you're  retrieving.  The  four  Com- 
modore file  types  supported  are 
program  (PRG),  sequential  (SEQ), 
relative  (REL),  and  user  (USR).  The 
1581  drive  recognizes  a  fifth  file 
type  (CBM)  which  is  used  to  parti- 
tion a  disk.  GEOS  doesn't  use  this 
file  type  and  File  Retriever  doesn't 
recognize  it.  If  you  accidentally  de- 
lete a  file  of  this  type,  use  the  UN- 
SCRATCH  program  that  comes  on 
the  1581  Test/Demo  disk. 

The  vast  majority  of  files  you'll 
encounter  will  be  program  or  se- 
quential files.  If  you're  not  sure 
which  file  type  to  use,  try  PRG.  If 
the  file  won't  load  correctly,  delete 
it  and  run  File  Retriever  again,  try- 
ing a  different  file  type. 

If  File  Retriever  doesn't  find 
any  retrievable  files,  a  dialog  box 
appears  telling  you  that  the  search 
has  been  completed  and  no  files 
were  retrieved.  You'!!  also  see  this 
dialog  box  if  you  decide  not  to  re- 
trieve any  of  the  files  found  by  File 
Retriever,  Click  the  mouse  or  joy- 
stick button  to  return  to  the  main 
menu.  If  you  retrieve  one  or  more 
files,  a  dialog  box  teiis  you  that  File 
Retriever  has  finished.  Click  to  re- 
turn to  the  main  menu. 

If  you've  retrieved  a  Commo- 
dore relative  file  (REL),  you'U  see 
an  additional  dialog  box  asking  you 


to  validate  the  disk  from  the  desk- 
Top.  This  is  the  only  time  you'll 
need  to  validate  the  disk.  Do  not 
validate  a  GEOS  disk  with  Commo- 
dore's validate  command;  use 
GEOS's  validate  command  instead. 

How  It  Works 

Files  that  are  deleted  by  being 
tossed  into  the  trash  can  or  by  being 
targets  of  the  scratch  command  are 
not  actually  erased  from  disk.  Their 
directory  entries  aren't  even  re- 
moved from  the  disk  directory.  Two 
things  happen  when  a  file  is 
scratched.  First,  the  file's  directory 
entry  is  marked  with  a  0  to  indicate 
that  the  file  has  been  scratched. 
Second,  the  block  availability  map 
(BAM),  an  area  of  the  disk  that 
keeps  track  of  which  disk  sectors 
are  currently  available  for  use,  is 
updated  to  include  the  sectors  in 
which  the  deleted  file  was  stored. 
File  Retriever  reverses  this  pro- 
cess. It  restores  the  directory  entry 
and  tells  the  BAM  that  the  sectors 
where  the  file  was  stored  are  no 
longer  available  for  use.  This  last 
point  is  the  key  to  why  any  un- 
scratch  program — including  File 
Retriever — will  be  100-percent  ef- 
fective only  if  there  have  been  no 
disk  operations  between  the  time 
the  file  was  scratched  and  the  time 
you  run  the  unscratch  program.  If 
you've  saved  any  programs  to  the 
disk  or  have  used  programs  that 
write  to  the  disk  (all  GEOS  desk  ac- 
cessories write  a  temporary  file  to 
the  disk),  DOS  may  have  written 
over  the  sectors  on  which  your  file 
was  stored.  If  this  is  the  case,  there 
is  no  way  to  recover  the  lost  file. 
See  program  listings  on  page  90. 


Coming 
Next  Month 

Two  GEOS 
Word  Processors 
Go  Head  to  Head 


CX)MPUTE! 
Publications 

Back  Issues/ 
Disk  Orders 

Individual  back  copies  of  maga- 
zines and  disks  are  available  by 
mail  only  while  quantities  last. 

Please  clip  or  photocopy,  and  mail 
completed  coupon  and  check  to: 

COMPUTE!  Publications 

Single-Copy  Sales 

P.O,  80x5188 

Greensboro,  NC  27403 


Name: 
Crty;  _ 


.  Zip: 


Type  of  CGfnputer  . 


Quamiiy 

Issue 
(Mmlh/Vfea() 

Magazine 
or  Disk  Name 

Pnce* 

SUBTOTAL; 

NY  residents-Add  m%  Tax: 

HC  residents— Add  5%  Tax: 

TOTAL 

Back  t^sues  of  COMPUTE',  and  COMPUWs  Ga- 
for^Q  are  S6.00  eacii.  No  issues  dated  pfHx  to  Jany- 
jiry,  lOSe,  are  available.  In  adcfilk)n,  the  following 
issucia  are  NOT  dv^ilnhtg:  Gtiattv:  \/^,  3/85. 
Singla  (Jtsks  (of  COMPUTE' s  Gafe/fc  aio  Si 5. 00. 
Disk/magazine  eombmatons  are  S16.00  NOTE  No 
dr$ks  ctaied  pnor  to  Jurte  \dSS  are  available.  TTw 
October,  1937  Gaxetle  disX  is  m  Eong^  avatlabte. 
Sacl^  issues  of  COMPUTErs  PC  MsgsiinQ  are 
SI €.00  each.  This  publK;9tiC)ri  is  available  only  as  a 
magazine/disJt  cxxnbinatior^  Our  bac*t  tssuo  inv^rttOfy 
consists  rnainfy  o!  magaifoes  wrth  3  2b-indn  disks. 
Th«  following  i^u^^  aid  NOT  available  PC  M»ga^ 
itm:m7.  n/37. 

Back  issiMts  o(  COMPUTE!  s  Amiga  Hesouco  maga- 
zine are  available  t>o>glniiir>g  with  Spring^  19S9  lor 
$6  OD  eacti.  Back  issues  oi  COMPUTUS  Amiga  Ra- 
source  Disk  are  availAPlO  t>€)gknning  wntb  SummerH 
19S9  for  SIO.DD  eac^t  Disk/magazme  cortiDv^siioa$ 
are  S  12.00- 

Shippinf]  and  handling  Included. 
NO  CREDIT-CARD  OflDEHS  ACCEPTED. 
PaymenI  must  be  in  US  dollars  by  ctiock  drawn  on 
US  bank, 


ADVERTlSEMErrr 


Fiighf 
notes 


#8A 


-4<  "Hawaiian  Odyssey"  Sceneiy 
Adventure  -  Locating  the  secret  jewel  o(  ttie 
goddess  Pele  from  Itie  cockpit  of  your 
single-engine  aircraft  (or  higii -performance  jet) 
isn't  just  as  simple  as  spotting  an  object  fronri  a 
distance  and  thten  fi^ng  toward  iL  r*io.  you  must 
find  and  follow  an  intricate  set  of  clues  scattered 
about  the  Hawaiian  Islands  that,  with  luck,  will  guide 
you  to  youf  Qoal. 

As  with  othct  mythical  quetu.  only  the  proper 
apprtsach  can  put  you  on  the  right  track  to  finding 
the  hidden  Jewel.  Even  if  you  can  determine  its 
location,  the  jewel  is  only  visible  uridef  a 
strictly-dermed  set  of  conditions.  Make  a  mistake 
during  your  final  approach  and  you  may  gel  lost  so 
completely  Ihnt  you'll  never  be  able  to  find  your  way 
bock! 


"Hawaiian  Odyssey"  Scenery  Adventure  disk  can 
be  used  with  any  SubLOQIC  (light  simulation 
program,  inctuding  Right  Simulator  tl.  Stealth 
Mission  and  Jet.  The  disk  covers  the  entire  Island 
chain  in  such  incredible  detail  you  can  almost  feel 
the  heat  from  the  volcanic  crater  at  Mauna  Loa! 
"Hawaiian  Odyssey"  Scenery  Adventure  ftofn 
SubLOGIC;  you've  never  seen  anything  like  it! 


Top  Selling  Commodore  64/128  Products 
This  Month; 

I, Plight  Simulator  ft  (S49.95) 

2.  Stealth  f^lsslon  ($49.95) 

3.  "Western  European  Tour"  Scenery  Disk 
<S29.95) 

4.  Scenery  Disk  #  7  ■  U.S.  Eastern  Seaboard 
(S29.95) 

5.Jcl<S39.95) 

6,  San  Francisco  Scenery  Disk  (S29.95) 

7.  Scenery  Disk  *  3  -  (J.S,  South  Pacific 
($24.95) 

e.  Scenery  Disk  #  4  -  U.S.  northwest 
(S24.95) 

See  your  dealer  to  purchase  SubLtSGlC  products, 
or  call  us  direct  to  order  by  charge  card  at  {600) 
637-4983.  Illinois  residents  CB1H2I7)  359-8482. 

SubLOGIC  Corporation 
501  Kenyon  Road 
Champaign,  IL  61820 

Please  address  any  feedfaacit'CorrespfMidencc  ret^ardin^ 
SubLCXilC  products.  opcrjMinns.  or  this  "Fligh!  rintes" 
column  (n  ATIN:  Chairman'*  Office. 
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Do  you  have  a  question  or  a  prob- 
lem? Have  you  discovered  some- 
thing that  could  help  other 
Commodore  users?  We  ivant  to 
hear  from  you.  Write  to  Gazette 
Feedback,  COMPUTERS  Gazette, 
P.O.  Box  5406,  Greensboro,  North 
Carolina  27403.  We  regret  that, 
due  to  the  volume  of  mail  received, 
ive  cannot  respond  individually  to 
programming  questions. 


"Gridloc"  for  the  PIus/4 

I  found  that  the  program  "Gridloc" 
for  the  128  (in  February  Gazette) 
would  run  on  my  Plus/4  after  some 
slight  modifications.  The  changes 
made  primarily  involve  the  WIN- 
DOW and  SOUND  statements. 

To  convert  the  program's 
WINDOW  statements  (in  lines  260, 
280,  380,  520,  and  630),  in  each  oc- 
currence, substitute  the  following: 

I'OKE  2023, {(o;)  kft  column} -.POKE 
2022, {/op  hft  roii!}:FOKE  20Zi,{bothw< 
right  column}:?OKE  2Q2l,{bottom  rislil 
row] 

After  a  window's  defined,  use 
PRINT  CHR$(147)  to  clear  it.  To  set 
up  a  window  without  clearing  it, 
use  PRINT  CHR$(19). 

For  example,  the  statement 
WINDOW  27,17,37,22,1  in  line  260 
defines  a  window  with  an  upper 
left  comer  at  column  27,  row  17, 
and  a  lower  right  corner  at  column 
37,  row  22,  The  last  parameter, 
with  a  value  of  1,  clears  the  win- 
dow. (A  0  would  leave  the  contents 
of  the  window  intact.) 

On  the  Plus/4,  this  statement 
converts  to 

POKE  2023,27:FOKE  2022,17:FOKE 
2024,37:rOKE  2021,22:PRINT 
CHR$(147) 

To  convert  the  SOUND  state- 
ments (in  lines  320,  330,  340,  430, 
and  640),  divide  the  frequency  (the 
second  parameter)  by  64.  For  ex- 
ample, the  SOUND  statement  in 
line  430  becomes 

SOUND1,(FNR(2000)  +  8000>/64,5 
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Also,  to  hear  the  sound  on  the 
Plus/4,  you  need  to  define  the  vol- 
ume level.  To  do  this,  add  the  line 
below: 

5  VOLS 

The  final  modification  in  the 
program  has  to  do  with  the  line 
lengths.  On  the  Plus/4,  lines  that 
are  longer  than  88  characters  will 
produce  a  7STR1NG  TOO  LONG 
error.  To  prevent  this  error,  split  up 
any  program  lines  that  exceed  this 
length. 

Nolan  Neathercutt 
Dallas,  TX 

Thanks  for  bringing  this  to  our  atten- 
tion. We're  sure  Plus/4  owners  will 
appreciate  your  efforts  in  this 
conversion. 

SiteeilScflttt  Modifications 

I  have  a  problem  with  SpcedScript 
3.2.  Some  commands  (Delete, 
Erase,  Load)  cause  the  background 
color  in  the  command  line  window 
to  change  to  red  or  green.  Since  I'm 
color-blind,  it's  difficult  for  me  to 
read  the  resulting  prompt.  For  in- 
stance, there  have  been  times  when 
I  wanted  to  erase  a  word  but  in- 
stead erased  an  entire  paragraph. 

Currently,  my  default  colors 
are  light  gray  text  on  a  black  back- 
ground. 1  would  appreciate  it  if  you 
could  show  me  how  to  modify 
SpeedScript  so  it  would  display  all 
command  line  messages  with  a 
black  background. 

Tony  Norona 
Kingston,  Ontario 

I  would  like  to  use  SpeedScript  3.2 
with  my  new  1581  drive.  This  drive 
is  device  number  9  in  my  system 
setup.  Could  you  tell  me  how  to  do 
this? 

Michael  Hutten 
Little  Valley,  NY 

SpeedScript  3.2  has  six  commands 
which  cause  a  change  in  the  back- 
ground color  of  the  command  line. 


They  are  SHIFT -CIR/ HOME  (erase 
all  'text),  CTRL-D  (delete),  CTRl-E 
(erase),  RESTORE  (exit  the  program), 
CTRL-l  (toggle  insert  mode),  and  F7 
(load). 

With  the  first  four  commands, 
you  can  use  any  of  the  64's  16  colors 
(values  0-15)  as  the  command  line 
background  color.  With  the  last  two 
commands,  any  color  other  than  black 
(a  color  value  of  0)  can  be  used. 

To  make  a  permanent  copy  of 
SpeedScript  with  any  color  changes, 
load  it  into  memory  (don't  run  it)  and 
POKE  the  color  values  you've  selected 
into  the  appropriate  memory  locations. 
The  table  below  provides  the  POKE 
addresses  along  with  the  range  of  suit- 
able color  values  for  each  command: 


Command 

Location 

Color 

Values 

SHin-CLR/HOME 

42S8 

0-15 

a-RL-D 

3358 

0-15 

CTRL-E 

4556 

0-15 

RESTORE 

2596 

0-15 

CTRL-l 

4258 

1-15 

F? 

5085, 

5104 

3-15 

For  example,  to  cause  the  command 
line  to  change  to  purple  (color  number 
4)  whenever  you  press  SHIFT-CLR/ 
HOME,  you'd  enter  POKE  4288,4. 

To  check  the  appearance  of  your 
color  selections,  run  the  program  and 
try  each  command.  If  you're  not  satis- 
fied with  the  results,  just  press  RE- 
STORE to  exit  the  program  and  POKE 
in  some  other  color  values.  When 
you've  finished  making  color  changes, 
be  sure  to  save  a  copy  of  the  program 
to  disk  or  tape. 

To  change  the  device  number  for 
the  disk  drive  to  9,  follow  a  similar 
procedure.  Load  a  copy  of  Speed- 
Script  into  memory  and  enter  the  two 
lines  beloio  from  immediate  mode: 

POKE  4843,9:POKE  4908,9:POKE 
5274,9:POKE  5873,9:POKE  5967,9 

POKE  6367,9:POKE  6883,9:POKE 
7003,9:FOKE  7073,9 

Ail  disk  commands  will  now  ac- 
cess device  number  9.  (If  you've  as- 
signed your  disk  drive  a  number  other 
than  9,  substitute  it  for  the  value 


POKEd  in  these  two  lines.) 

Again,  be  sure  to  save  a  copy  of 
this  modified  SpeedScript  before  you 
run  if. 

Is  Anyone  Out  There? 

I'm  currently  working  on  a  disk  and 
print  utility  program  for  my  128 
and  would  like  to  know  how  to 
check  if  the  disk  drive  or  printer  is 
on.  I've  tried  every  approach  I  can 
think  of,  but  still  I  come  up  with  a 
DEVICE  NOT  PRESENT  error. 

Jay  Vanover 
Seoul,  South  Korea 

The  following  routine  determines 
whether  the  disk  drive — or  any  other 
device — is  online  without  breaking 
out  of  the  program: 

10  N-8:POKE  6,N:REM  N  IS  THE 

DEVICE  NUMBER 
20  POKE  IM,0:SYS  65457:S-ST:SYS 

65454:S=S  OR  ST 
30  IF  S  THEN  PRINT"DEVICE"N"NOT 

ONLINE." 

To  check  whether  the  printer  is  online, 
set  N  equal  to  4  in  line  10.  Of  your 
printer  is  device  3,  set  N  equal  to  3.) 

This  three-liner  checks  the  status 
of  the  serial  bus  after  executing  lozv- 
level  Kernal  routines.  First,  line  10 
stores  the  device  number,  N,  into  the 
accumulator  shadow  register.  (To  use 
this  routine  on  a  64,  change  POKE 
6,N  to  POKE  780,N.) 

Line  20  clears  the  Kernal  status 
register  (at  location  144)  and  calls  the 
Kernal  routine  LISTEN  (SYS  65457). 
LISTEN  causes  the  specified  device 
on  the  serial  bus  to  begin  receiving 
data.  The  status  register  is  then  read 
and  stored  as  S.  If  LISTEN  is  success- 
ful— that  is,  if  the  device  is  online  and 
ready  to  receive  data — S  will  be  0. 
Otherwise,  S  will  contain  a  nonzero 
value. 

The  next  SYS  calls  the  Kernal 
UNLSN  (unlisten)  routine  (at  location 
65454),  which  instructs  all  serial  de- 
vices to  stop  accepting  data.  The  sta- 
tus register  is  read  a  second  time.  If  it 
contains  a  nonzero  value,  an  error  has 
occurred. 

Last,  the  two  status-register  val- 
ues are  combined  (ORed).  If  either 
SYS  returns  a  nonzero  value,  the  mes- 
sage in  line  30  prints. 

This  routine  is  more  comprehen- 
sive than  the  BASIC  routine  offered  in 
January  "Feedback"  under  the  head- 
ing "Printer:  Are  You  There?,"  but 
some  printers  may  hang  up  if  the 
printer  is  turned  on  but  isn't  online. 
Should  this  occur,  you  can  continue 


without  falling  out  of  the  program  by 
simply  putting  the  printer  online. 

Identifying  Disks 

I  have  some  questions  regarding 
the  process  of  changing  the  disk  ID 
number.  From  what  I  understand, 
when  the  disk  is  formatted,  each 
block  header  has  the  ID  contained 
in  it.  When  the  ID  is  changed  with  a 
utility  or  sector  editor,  only  the  ID 
listed  on  track  18,  sector  0  is 
changed.  Does  this  confuse  the 
drive? 

When  you  change  a  disk,  does 
the  drive  read  the  ID  at  the  block 
header  or  in  the  directory  name? 
Should  it  become  a  standard  proce- 
dure to  use  the  "10:"  command 
whenever  a  disk  is  changed  in  order 
to  avoid  problems?  If  the  ID  is 
changed,  can  it  create  any  prob- 
lems, and  if  so,  what  are  they,  and 
what  should  be  done  to  avoid  them? 
Jim  Saracen o 
Glendale,  MO 

It's  true  thai  the  disk  drive  writes  the 
disk  ID  in  the  header  of  every  sector 
when  it  formats  a  disk.  The  two- 
character  ID  that  is  visible  in  track 
1 8,  sector  0  is  used  by  the  disk  drive 
only  to  build  a  disk  directory.  You  can 
change  it  to  anything  you  wish  with- 
out confusing  the  drive. 

Each  time  the  disk  drive  per- 
forms an  operation,  it  reads  the  disk 
ID  from  a  sector  header  on  the  disk.  If 
the  ID  doesn't  match  the  one  it  has  in 
memory,  the  drive  assumes  it  has  a 
new  disk  and  reads  the  block  availa- 
bility map  (BAM)  from  the  disk.  If  the 
ID  matches,  the  drive  assumes  the 
disk  hasn't  been  changed  and  uses  the 
copy  of  the  BAM  it  has  in  memory. 

Sending  "10:"  every  time  you 
change  disks  is  overkill.  It  doesn't 
hurt  anything,  but  it's  not  really  nec- 
essary if  each  disk  has  a  unique  ID.  If 
you  have  several  disks  with  the  same 
ID,  using  "10:"  may  be  the  only  way 
you  can  prevent  disaster. 

The  only  possible  harm  that 
could  come  from  changing  an  ID  in 
track  18,  sector  0  is  that  you  may 
think  that  tivo  disks  have  different 
IDs  when  in  fact  they  do  not.  This 
would  only  become  a  problem  if  you 
were  swapping  the  two  disks  in  and 
out  of  the  same  drive. 

Proofreading  with  a  TV 

My  problem  has  to  do  with  the  pro- 
gram "The  Automatic  Proofread- 
er," written  by  Philip  Nelson.  The 


problem  is  that  I  am  using  a  TV  for 
a  monitor  and  the  TV  has  no  adjust- 
ment for  positioning  the  picture. 
The  result  is  that  the  Proofreader 
checksum  is  placed  in  the  home  posi- 
tion, where  it  is  very  difficult  to  see. 
Could  you  tell  me  how  to  move 
the  checksum  to  the  top  middle  of 
the  screen? 

Charles  R.  Taylor 
Trenton,  OH 

While  it  IS  possible  to  move  the  check- 
sum to  the  top  middle  of  the  screen,  it 
would  require  rewriting  "The  Auto- 
inatic  Proofreader."  A  simpler  change 
involves  moving  the  checksum  to  the 
right  by  one  character  or  down  one 
line. 

Three  lines  tnust  be  changed  to 
move  the  checksum.  To  move  the 
checksum  down  one  line,  change  the 
number  20570  in  line  80  to  20565,  the 
22054  in  line  110  to  22049,  and  the  18 
in  line  190  to  13.  To  move  the  check- 
sum to  the  right  one  character,  change 
the  20570  in  line  80  to  20584,  the 
22054  in  line  110  to  22068,  and  the  18 
in  line  130  to  32. 

The  Proofreader  checksum  nor- 
mally appears  on  the  screen  in  reverse 
video.  The  changes  given  above  sub- 
stitute cursor-control  commands  for 
the  reverse-video  command,  Al- 
though the  checksum  no  longer  ap- 
pears in  reverse  video,  with  it 
repositioned,  you  should  now  be  able 
to  see  it  on  most  TVs.  6 
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wilFt  all  the  features  cl  a  professional  drawifig 
package  such  as  drawing  SMOOTH  tfeehand  lines. 
3D  Solids,  creating  Slideshows.  Cut  &  Pasie.  Clip. 
Flip.  Enlarge.  Shaded  Fill  Patlerns.  a  variety  ot 
Fonts,  Air  Brush  and  more!  II  supports  Printshop 
graphics  and  is  completely  compatible  wilh  all 
BASIC  8  hies 

Sketchpad  1  ?6  unleashes  the  graphics  poMer  ol 
your  C128f  It  supports  your  1351  Mouse.  64K 
Video  Chip.  1581  drive  and  flO  column  display. 
What  more  i;suld  aii)  real  C12B  user  ask  for? 

ONLY  $24.00 


Spectrum  128 


A  deluxe  paint  program  tor  the  C12SD  computer 
(or  the  CI  28  with  64K  Video  RAM  Upgrade),  Uses 
80  column  display  for  tAQ  i  200  pixel  resolution. 
Will  display  1 28  colors!  Menu  operated,  flecjuires 
1351  or  compatible  Mouse,  Features  include  air 
brush,  erase,  mirror,  multi-color,  block  till  or 
erase,  pixel  editor,  color  editor,  fdnts.  slide  show 
and  more  Compatible  wilh  Sketchpad  1 28,  News 
Maker  128.  Basic  B.  1750  HEU,  1541.  1571  and 
1531  disk  drives. 

OUR  PRICE  $29.00 


NEWSMAKER 

Finally,  Oejkiep  Ptiblishing  lor  your  C12a! 

News  Maker  128  can  be  used  to  create  profes 
sional  looking  newsletters.,  reports,  sigris  and 
posters.  It  can  be  used  as  a  stand  alone  program 
or  in  combination  wilh  word  processing  or  graphic 
sollware.  It  uses  standard  sequential  tiles  lor 
"pouring"  text  inio  user  delined  columns.  Full 
page  layout,  pop  down  menus,  smooth  screen 
scrolling,  font  seleclion.  cut,  paste,  minor,  ttip 
are  among  the  options  avaifaWe.  News  Maker  128 
requires  a  CI  280  computer  or  a  CI  28  with  64K 
Video  HAM  Chips  installed,  an  80  column  RGB 
monitor,  a  1571  disk  drive.  1351  or  M  3  Mouse 
and  a  Commodore  or  compatible  printer.  Optional 
equipment  supported  includes  the  1 750  RAM  Ex 
pan  SI  on  Urat  and  a  second  disk  drive. 

ONLY  $24.00 


K.K.(3.^. 


1,..>  C.i.i 


This  new  action-packed  arcade  game  for  your 
C-64  turns  you  into  the  ultimate  warrior.  Dur 
civitiiation  depends  on  /ou.  Your  armour-plated 
body  is  equipped  with  the  deadly  MX-60  hand 
rockets  to  assist  you  in  destroying  the  band  of 
enemy  agents  that  tiave  invaded  the  capital  city. 
GOOOLUCK!  ONLY  $24.00 


BASIC  B  IS  HERE 

This  program  is  a  must  lor  CI  28  programmersf 
Basic  8  includes,  extensive  80  column  graphics 
capabilities,  over  50  new  graphic  commands  and 
drawing  m  three  dimensional  environment.  A  new 
200  page  manual  has  been  written  for  this  revised 
and  updated  two  disk  version  Also  as  an  extra 
the  liip  side  has  included  preprogrammed  Bitsic  8 
applications  of  Bjsic  Paint,  Write  anit  Calc. 

OUR  PRICE  $29.00 


SoWwML'  Int.  nsEga  " 


Basic  8 
Toolkit 


BASIC  8  TOOLKIT 
This  toolkit  IS  designed  lo  give  you  easy  access  to 
the  many  powerlul  features  of  Baste  B.  It  features 
a  point  and  click  operation  system  that  will  allow 
you  to  create  custom  pointers,  fonts,  patterns  and 
icons  In  addition,  the  Toolkit  will  allow  you  to 
convert  Print  Shop  Graphics  into  Basic  8  files. 


JUST  $17.00 


f54f/fS7f 
DSrvB  AiiSimxni 


1541/1571  Drive  Alignment 

This  excelieni  alignment  program  ts  a  must  have 
for  every  Commodore  owner  Easy  to  use,  it  helps 
you  to  align  your  drive  so  that  it  runs  just  as  If  it 
were  new!  The  simple  instructional  manual  and 
onscreen  help  prompt  you  thru  the  aiignmenl 
procedure  and  help  you  adjust  the  speed  and  head 
stop  of  your  drives.  It  even  includes  instructions 
on  how  tc  load  the  alignment  program  when 
nothing  else  will  load.  Don't  be  caught  short!  Wc 
get  more  RED  LA8EL  orders  lor  this  program,  then 
any  other  program  we  sell.  Save  yoursell  the 
expense!  Order  now.  keep  it  in  your  library  and 
use  the  1 541 H  571  Orive  Alignment  program 
reguiariyl!  Works  on  the  Cfi'l,  C128,  and  SX64  for 
both  the  1541  and  1571  drives. 

STILL  ONLY  $25.00 


BHiWALL 

soiifj  pnoDunis  s  solid  suppohi 

Ktit/Iii*n  t>A  19530 

I  Hue  7i  Hmii  (Viler  Line  1  BOO  638  i/ 

'M  Hour  Ordt'i  Line  niitsnts"  USA 
1  716  683  4433 

?«  itom  1  AK  Line     I  ?1 1683  8567 

Ciiworaw  Serwt'     WI5  6fl3  5J3J 


FLE«SE  COME  VISIT  US! 
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I  ' 

Write  or  Cjil  lor  our 

GBEA1  AMIGA  OR  ^Ult\2i  CArAlOi; 


Home  Designer 

HeniE  Deiigner  CAD  MS 

Given  glowing  ratings  by  every  major  Commodore 
migarme.  this  CAO  sysiem  outclasses  every 
jiher  CAO  program,  because  of  its  obieclbased 
design  Wilh  over  50  powerful  commands,  5 
drawing  layers.  Superb  support  ol  library  figures 
and  la:er-guality  printouts  at  ANV  scale  on  your 
dot  matrix  printer  or  plotter,  you  can  create 
drawings  so  accuraie  Ihat  a  blueprint  can  be  made 
from  themi 

Tired  ol  working  with  poor  qualily/inaccurale  print 
outs,  manipulalinq  little  dols  on  a  bit  map.  giving 
up  on  detailed  work  because  you  can't  ;oom  m 
close     enough''    Join  the  prolossionals' 

only  $45.00 
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The  Nemletter  Awards 


Randy  Thomiisan 

"Programmer's  Page"  columnist 
Randy  Thompson  needed  space  to 
present  his  user  group  neivsletter 
aivards.  I  hereby  donate  this 
month's  column  to  him. 

— Rhett  Anderson 

tt  never  fails.  Approximately  once  a 
month  I  enter  my  office  and  find  a 
large  pile  of  user  group  newsletters 
stacked  high  on  mv  desk  or  chair, 

COMPUTE!  gets  hundreds  of 
newsletters.  Most  originate  from 
the  United  States,  but  many  arrive 
from  other  countries  such  as  Mexico, 
Canada,  and  even  Australia. 

One  reason  we  receive  so 
many  ne^vsletters  is  to  keep  our  re- 
cords up-to-date.  When  newsletters 
arrive  at  our  office,  they're  given  to 
editorial  assistant  Mickey  McLean. 
Mickey  logs  them  in  and  notes  all 
the  new  user  groups  for  his  "User 
Group  Update"  column.  Come 
spring,  the  entire  list  is  published  in 
our  annual  guide  to  user  groups. 

The  newsletters  then  pass  from 
Mickey  to  Rhett  Anderson  (the  fel- 
low who  usually  writes  this  col- 
umn) to  me.  1  peruse  the  issues — 
photocopying  any  information  that 
I  find  interesting,  useful,  or  just 
plain  humorous- — and  then  pass 
them  along  to  program  designer  Bill 
Chin,  who  hands  them  to  technical 
editor  Dale  McBane,  who  gives 
them  to ,  .  .  well,  you  get  the  idea. 

[  like  to  read  user  group  news- 
letters  because  they  keep  me  in 
touch  with  the  real  world,  i  get  to 
hear  about  everyday  computer  us- 
ers. I  learn  how  and  why  they  use 
their  computers  and  what  their  in- 
terests are. 

Most  newsletters  look  general- 
ly the  same.  The  first  page  holds 
some  sort  of  commentary  written 
by  the  user  group's  president  or 
editor — -"The  Prez  Sez"  or  "From 
the  Editor's  Desk"  are  two  common 
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titles  for  this  section.  Inside  you'll 
often  find  the  minutes  from  the  last 
user  group  meeting,  followed  by 
product  reviews,  news,  and,  finally, 
the  contents  of  the  most  recent  club 
disk.  Calendars  make  popular  back- 
page material;  they  serve  as  a  prac- 
tical reminder  of  that  month's  user 
group  events. 

My  favorite  section  in  a  news- 
letter is  where  magazines  such  as 
Gazeiie  are  reviewed.  Call  it  vanity, 
but  1  like  to  know  what  other  peo- 
ple think  of  the  magazine  I  help 
produce.  1  also  like  to  know  what 
they  think  of  our  competitors. 

With  all  the  newsletter  editors 
evaluating  us,  1  thought  it  only  ap- 
propriate that  we  evaluate  them. 
The  result?  Gazette's  possibly  annu- 
al Newsletter  Awards. 

And  the  Winners  Are 

The  following  awards  have  not 
been  selected  by  a  large  panel  of 
judges  and  the  results  were  not  tal- 
lied by  a  major  accounting  firm 
whose  title  spans  three  names. 
They  were  decided  by  three  people: 
Rhett  Anderson,  Bill  Chin,  and  me. 

Best  Cover  goes  to  the  Society 
of  Computer  Owners  and  PET  En- 
thusiasts (SCOPE),  of  Richardson, 
Texas,  whose  April  newsletter 
sports  a  cover  that  is  completely 
backward — title,  picture,  date,  ev- 
erything. The  cover  shows  the  back 
side  of  an  Amiga  2000  with  the 
earth-shattering  caption  NEW 
VERSION  OF  THE  GAME  "RE- 
VERSl"  FOR  THE  AMIGA.  To  read 
this  exciting  headline,  you  have  to 
hold  the  newsletter  up  to  a  mirror, 
of  course. 

Most  Interesting  and  Unusu- 
al Newsletter  goes  to  the  Prison- 
er's User  Group  (PUG).  Touted  as 
the  "Computing  Behind  Bars"  pub- 
lication, this  newsletter  is  the  prod- 
uct of  the  residents  of  the  Monroe 
Washington  State  Correctional  In- 
stitute. It's  well  written  and  inter- 


esting to  read.  Apparently,  the 
inmates  have  access  to  several 
brands  of  computers,  including  64s 
and  128s.  They  are  allowed  to  have 
a  computer  system  in  their  cell,  but 
they  must  keep  it  quiet  after  10  p.m. 
so  that  others  can  sleep  (no  loud 
game  playing  at  midnight). 

Best  Calendar  goes  hands- 
down  to  Lane  County  Commodore 
User  Group  (LCCUG),  of  Eugene, 
Oregon.  Their  computer-generated 
calendars  include  clip  art  and  at 
least  one  interesting  quote,  user 
group  event,  or  historical  piece  of 
trivia  for  every  day  of  the  month. 
For  example,  did  you  know  that  a 
blizzard  caused  an  ice  jam  to  block 
Niagara  Falls  for  30  hours  on  March 
29,  1848?  I  regularly  photocopy  the 
LCCUG  calendar  for  my  use  and 
for  the  use  of  three  other  COM- 
PUTE! editors. 

Most  Touching  Editorial  goes 
to  Finger  Lakes  Commodore  User 
Group  (Flugger),  of  Geneva,  New 
York.  This  article,  which  appears  in 
the  Flugger  March/April  1989 
newsletter,  details  a  serious  auto 
accident  involving  one  of  the  user 
group's  most  loyal  supporters  and 
best  writers,  Kevin  Beagle.  Because 
of  the  accident,  Kevin  has  lost  much 
of  his  memory  and  all  of  his  motor- 
control  functions.  One  of  Kevin's 
software  reviews  follows  the  Flug- 
ger editorial — it's  very  good. 

Our  Most  Appropriate  Use  of 
Plagiarism  award  goes  to  a  Mexi- 
can newsletter  whose  name  unfor- 
tunately eludes  me.  What  attracted 
me  to  this  particular  newsletter  was 
an  article  tliat  was  a  word-for-word 
Spanish  translation  of  one  of  my 
previous  "Programmer's  Page"  col- 
umns. Honestly,  I'm  flattered,  and 
I'm  glad  that  the  information  in  that 
column  is  being  put  to  use.  My  only 
complaint  is  that  they  removed  my 
byline  and  any  reference  to  Gazette. 
Oh  well,  at  least  it  won  an  award — 
even  if  !  did  nominate  it.  6 


Si 


Fred  D'IgnazIo 

The  other  day  I  received  a  letter 
from  Brigitta  Malm,  of  New  Or- 
leans, Louisiana.  Brigitta  had  just 
finished  reading  my  article  about 
my  travels  around  the  U.S.  and 
Canada  with  HERO,  JR.,  the  "pet" 
robot  from  Heath  Company.  The 
article  had  so  inspired  Brigitta  that 
she  went  out  and  purchased  a 
HERO,  JR.  of  her  own.  Here's  her 
description  of  what  life  has  been 
like  with  a  robot: 

My  only  previous  expo- 
sure to  robots  was  a  remote- 
controlled  unit  in  a  shopping 
center.  So  having  my  very 
own  robot  has  been  quite  an 
adventure  for  me.  Buttons  has 
been  with  us  for  a  year  now 
and  the  house  is  showing  un- 
mistakable signs  of  his  (its) 
presence:  marks  on  table  legs 
he  tried  to  climb,  a  few  dark 
streaks  on  the  floor  from 
twirling  around  too  fast.  And 
although  he  will  never  learn 
why  the  walls  have  to  be 
where  he  would  like  to  ex- 
plore, he  has  been  a  most  en- 
joyable companion — a  toy,  a 
pet,  a  new  dimension,  and  a 
fantasy  come  true.  He's  also 
given  surprising  insights  into 
friends  and  relatives. 

Reactions  have  been  ver- 
bal abuse  from  an  otherwise 
technically  inclined  person 
with  experience  in  robotics; 
jealousy;  hesitation  and  fear 
of  new  technology;  the  sug- 
gestion from  a  grandmother 
that  if  I  wanted  a  child,  I  could 
have  borrowed  her  grandson; 
screams  from  a  toddler;  and, 
yes,  enthusiasm.  Unexpected- 
ly, outright  acceptance  and 
delight  have  come  mostly 
from  an  80-year-oId  uncle 
and  two  other  octogenarian 
friends  in  England.  Indeed, 
the  robot  sang  "Happy  Birth- 
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day"  over  the  telephone  to 
one  of  them.  Maybe  only  el- 
derly people  have  enough 
wisdom  and  fortitude  to  ac- 
cept a  mere  moving  computer 
without  feeling  threatened, 
while  younger  ones  are  strict- 
ly guided  by  utilitarian  con- 
siderations ("If  it  can't  clean  a 
house,  forget  it!"}. 

Robots  Everywhere 

Brigitta's  letter  made  me  feel  a 
sharp  pang  of  nostalgia — a  longing 
for  the  days,  just  a  few  years  ago, 
when  robots  had  captured  the  pub- 
lic's imagination.  The  Star  Wars 
movies  had  just  come  out,  and  ev- 
eryone idolized  cute,  little  R2D2 
and  his  sidekick,  C3PO.  Every  kid 
had  a  box  full  of  GoBots  and  Trans- 
former robots.  CBS  Toys  came  out 
with  a  programmable  warrior  robot 
named  Max.  The  Big  Trak  tank  ro- 
bot from  Milton  Bradley  was  a  big 
hit,  as  were  the  Chatbot  and  the  lit- 
tle Dingbot  robots  from  Tomy.  An- 
drobots  introduced  Topo,  the 
world's  first  (and  last)  robot  snow- 
man. Robot  arms  seemed  to  sprout 
up  from  every  personal  computer's 
desktop.  Hubotics  created  Hubot, 
the  first  robot  appliance,  complete 
with  a  TV  set,  a  videogame,  a  stor- 
age cabinet,  and  a  cutting  board. 
And  Heath  came  out  with  its  HERO 
and  HERO,  JR.  robots,  modeled 
after  the  incredibly  popular  R2D2. 

The  programmable  robots 
were  especially  fun.  Robot  turtles — 
programmed  in  Logo — were  espe- 
cially in  vogue.  The  litde  robots 
looked  like  inverted  soup  bowls 
rolling  around  on  wagon  wheels. 
They  were  connected  to  a  computer 
by  long  tether  cords,  which  wore 
were  long  enough  to  let  the  robots 
get  into  plenty  of  trouble. 

My  favorite  robots  in  those 
days  were  the  odd  little  robots  in 
the  MOVITS  family  from  OWl 
Electronics.  The  engineers  who  de- 
signed the  MOVITS  had  offbeat 


Where  Have 
AH  the  Robots  Gone? 

and  quirky  imaginations.  Each 
member  of  the  MOVITS  family  had 
a  completely  different  kind  of  body 
and  personality.  For  one  of  my  TV 
shows  we  set  up  a  robot  zoo  in  our 
kitchen.  Robot  monkeys  climbed 
along  strings  tied  to  the  kitchen 
cabinets.  Robot  spiders  slinked 
along  kitchen  counters.  Kangaroos 
hopped  off  the  kitchen  table,  in- 
verted flying  saucers  and  robot 
buggies  rolled  around  the  floor. 

The  little  robots  were  all  the 
size  of  a  plump  guinea  pig  and  were 
made  of  clear  plastic  so  you  could 
see  their  insides.  They  were  under 
microprocessor  control  and  usually 
featured  a  sensor  that  guided  their 
activities.  Some  robots — the  "wall 
bangers" — had  pressure  sensors. 
The  "seeing"  robots  could  sense 
light  and  would  either  approach  a 
bright  light  or  try  to  avoid  it.  One 
robot,  six-legged  Mr.  Bootsman, 
had  an  audio  sensor.  When  he 
heard  you  clap  or  whistle,  he  would 
stop  marching  in  one  direction  and 
immediately  goose-step  off  in  a 
new  direction. 

A  Robot  Rounifup 

Brigitta's  letter  was  a  real  thrill.  Un- 
til I  received  it,  1  had  thought  that 
robots  had  become  as  extinct  as  the 
dinosaurs  and  dodo  birds. 

Are  there  other  robots  out 
there? 

Robot  owners  of  the  world,  let 
me  hear  from  you.  Where  have  all 
the  robots  gone?  If  you  own  a  robot, 
please  write  me  and  tell  me  about  it. 
Write  to 

Fred  D'Igttazw 

c/o  COMPUTEI's  Gazette 

324  West  WouUwer  Avenue,  Suite  200 

Greensboro,  North  Carolina  27408 

I'll  gather  your  letters  together 
and  publish  a  Robot  Roundup  in  an 
upcoming  column.  Who  knows? — 
this  may  be  the  start  of  a  Robot 
Support  Group  for  parents  of  or- 
phaned robots.  G 
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User  Group 
Update 


Gompileil  by  Mickey  McLean 


The  following  list  includes  updated  entries  to  our  annual  "Guide  to 
Commodore  User  Groups,"  which  last  appeared  in  the  May  and  June  1988 
issues. 

Send  typed  additions,  corrections,  and  deletions  for  this  list  to 

Commodore  64/128  User  Group  Update 
COMPUTEI's  Gazette 
P.O.  Box  5406 
Greemboro.  NC  27403 

When  writing  to  a  user  group  for  information,  please  remember  to 
enclose  a  self-addressed  envelope  with  postage  that  is  appropriate  for  the 
country  to  which  you're  writing. 

Note:  COMPUTE!  Publications  does  mt  condone  the  use  of  its  user  group  lists 
by  individuals  or  user  groups  for  the  purpose  of  bu]fing,  selling,  or  trading 
pirated  software.  Should  we  discover  any  group  participating  in  any  such 
illegal  and  unethical  activity,  the  club's  listing  will  be  permanently  deleted 
from  our  files. 

User  Group  Notes 

The  Chicksands  Computer  Club  (C  cubed),  an  armed  services  club 
located  in  England,  can  be  reached  directly  by  writing  to  Chicksands 
Computer  Club,  Attn:  Recreation  Center,  RAF  Chicksands,  Shefford 
Beds.,  England  SG17  5PZ,  or  by  sending  correspondence  through  its  APO 
address:  P.O.  Box  148,  6950th  ESG,  APO  New  York,  NY  09193. 

New  Listings 


ALABAMA 


Montgomery  Area  Commodore  Komputer  Soci- 
ety (MACKS),  P,0.  Bon  210126,  Montgomery', 
AL3612I-D126 


CAt.UORXlA 


Orange  County  Commodore  Club  (OCCC),  7950 
Punlan  St.,  Douiiey,  CA  ')1)2^2 

HI  Desert  Commodore  Vien  Group,  62026  Sun- 
burst Cir.,  Joshiij  Tree,  CA  ')2252 

Vcnlura/Oxnard  Commodore  User  Group,  4157 
Sunset  Ln.,  Osiiard,  CA  93035 

Valley  Commodore  Users  Group,  P.O.  Box  3228, 
Salinas,  CA  93912 

Access  Computer  Club,  P.O,  Bok  3175,  Liver- 
mure,  CA  94550 

Valley  Computer  Club,  PO.  Box  310,  Denalr.  CA 
95316 

Marysville-Yuba  Cily  Hub  Arei  Commodore 
Club  (HACC),  7127  Arrowhead  Tr..  Browns 
Valley,  CA  95918-9630 

North  Valley  Commodore  Users  Group 
(WCUC),  P.O.  Box  7658,  Chico,  CA  95927 


CONNECTICUT 


Hartford  County  Commodore  Users  Group,  Inc., 

I'.O.  Ilux  8553,  i;,i5t  ILirtlord,  CT  06108 


The  Naugaluck  Valley  Commodore  Users 
Group,  P.O.  Wm  622,  Waterbury,  CT  06720 


FLORIDA 


Connmodorc  Milton  User  Group  (CMUG),  P.O. 

Bos  225,  Miliiin.  I-L  32572 
Starcom  User's  Group  Martin  County,  P.O.  Box 

1446,  Port  Salernu,  Fl.  33492 


glorc;l\ 


Commodore  Users  Group  of  Columbus,  Georgia, 
960  B  Mithad  St.,  Columbus,  GA  31905-5122 


HAWAII 


MiHlani  User  Group,  276  Olive  Ave.,  #6, 

W.il>i,vpnv,i,  Ml  967S6 
Maki  Commodore  User  Group  (MCUC),  P.O.  Box 

h3Hl,  llmuJlulu,  HI  96818 


INDLWA 


Commndore  Computer  Club,  P.O.  Box  2332, 

s;v.insvil!,-.  IN  47714 


MAINE 


island/ Reach  Computer  Users  Group,  Inc.,  PO. 
ikix  73,  Uit-r  Isle.  ME  04627  (BBS*  207-374  2303) 


NL\RVLA.\n 


North  Baltimore  Users  Croup  (NOBUG  64/1 2S), 
P.O.  Box  18835,  Baltimore,  MD  21206 


MICIHCAN 


Tri-County  Computer  Club,  607  H.  Dowland  St., 

l.udington.  Ml  49431 
Northern  Michigan  Commodore  Club  (NMCC), 

P.O.  Box  3066,  Gaylord,  Ml  49735  (BBS* 

517-732-2275) 


MISSOURI 


Barton  County  Commodore  Users  Group 
(BCCUG),  307  \V.  llih,  Ljmar,  MO  64759 


NorthEast  Ohio  Computer  Users  Group 

(NEOCUG  Incl,  P.O.  Box  196.  VVickliffe,  OH 

44092 
I'ortage  County  Commodore  Family  User  Croup 

(PCCFUG),  j'O.  lios  901,  Ravenna,  OH  44266 

(BBS#  216-296-3692) 

Worldwide  Commodore  Users  Group  (Inter- 
national Headquarters),  P.O.  Box  337,  Blue  Bell, 
PA  19422 


riiXAS 


Texas  Commodore  User's  Group,  PO.  Box  623, 

Koysc  City,  TX  750S9 
The  Wichita  County  Commodore  User's  Co-op, 

240  KitchingsSl.,  Wichita  Falls,  TX  76301  (BBSs 

817-761-3610  or  817-696-2520) 


WASHINGTON 


Prisoner's  User  Group,  P.O.  Box  777,  Monnie, 

WA  98272 

Outside  the  U.S. 


CANADA 


Commodore  User  Group,  R.R.  1,  Havelock,  New 
Brunswick,  Canada  EOA  IVVO  g 


tammfvcimimlmta 


Kutimfi 
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MLX 


Machine  Language  Entry  Program 
For  Commoiore  64 


Ottis  R.  Cowper  I 


"MLX"  is  a  labor-saving  utility  that  al- 
lows almost  fail-safe  entry  of  Commo- 
dore &4  mactiine  language  programs. 

Type  in  and  save  some  copies  of  MLX — 
youll  want  to  use  it  to  enter  future  ML 
programs  from  COMPUTEI's  GAZETTE. 
When  you're  ready  to  enter  an  ML  pro- 
gram, load  and  run  MLX.  It  asks  you  for  a 
starting  address  and  an  ending  address. 
These  addresses  appear  in  the  article  ac- 
compan3dng  the  MLX-format  program 
listing  you're  typing. 

If  you're  unfamiliar  with  machine 
language,  the  addresses  (and  all  other 
values  you  enter  in  MLX)  may  appear 
strange.  Instead  of  the  usual  decimal 
numbers  you're  accustomed  to,  these 
numbers  are  in  hexadecimal — a  base  16 
numbering  system  commonly  used  by 
ML  programmers.  Hexadecimal — hex 
for  short — includes  the  numerals  0-9 
and  the  letters  A-F.  But  don't  worry — 
even  if  you  know  nothing  about  ML  or 
hex,  you  should  have  no  trouble  using 
MLX. 

After  you  enter  the  starting  and 
ending  addresses,  you'll  be  offered  the 
option  of  clearing  the  workspace. 
Choose  this  option  if  you're  starting  to 
enter  a  new  listing.  If  you're  continuing 
a  listing  that's  partially  typed  from  a  pre- 
vious session,  don't  choose  this  option. 

A  functions  menu  will  appear.  The 
first  option  in  the  menu  is  ENTER 
DATA.  If  you're  just  starting  to  type  in 
a  program,  pick  this.  Press  the  E  key, 
and  type  the  first  number  in  the  first 
line  of  the  program  listing.  If  you've  al- 
ready typed  in  part  of  a  program,  type 
the  line  number  where  you  left  off  typ- 
ing at  the  end  of  the  previous  session 
(be  sure  to  load  the  partially  completed 
program  before  you  resume  entry).  In 
any  case,  make  sure  the  address  you  en- 
ter corresponds  to  the  address  of  a  line 
in  the  listing  you  are  entering.  Other- 
wise, you'll  be  unable  to  enter  the  data 
correctly.  If  you  pressed  E  by  mistake, 
you  can  return  to  the  command  menu 
by  pressing  RETURN  alone  when 
asked  for  the  address.  (You  can  get  back 
to  the  menu  from  most  options  by 
pressing  RETURN  with  no  other  input,) 

Entering  A  Listing 

Once  you're  in  Enter  mode,  MLX  prints 
the  address  for  each  program  line  for 
you.  You  then  type  in  all  nine  numbers 
on  that  line,  beginning  with  the  first 
two-digit  number  after  the  colon  (:). 
Each  line  represents  eight  data  bytes  and 


a  checksum.  Although  an  MLX-format 
listing  appears  similar  to  the  "hex 
dump"  listings  from  a  machine  lan- 
guage monitor  program,  the  extra 
checksum  number  on  the  end  allows 
MLX  to  check  your  tjfping. 

When  you  enter  a  line,  MLX  recal- 
culates the  checksum  from  the  eight 
bytes  and  the  address  and  compares 
this  value  to  the  number  from  the  ninth 
column.  If  the  values  match,  you'll  hear 
a  bell  tone,  the  data  will  be  added  to  the 
workspace  area,  and  the  prompt  for  the 
next  line  of  data  will  appear.  But  if  MLX 
detects  a  typing  error,  you'll  hear  a  low 
buzz  and  see  an  error  message.  The  line 
will  then  be  redisplayed  for  editing. 

Invalid  Characters  Banned 

Only  a  few  keys  are  active  while  you're 
entering  data,  so  you  may  have  to  un- 
learn some  habits.  You  do  not  type 
spaces  between  the  columns;  MLX 
automatically  inserts  these  for  you.  You 
do  not  press  RETURN  after  typing  the 
last  number  in  a  line;  MLX  automatical- 
ly enters  and  checks  the  line  after  you 
type  the  last  digit. 

Only  the  numerals  0-9  and  the  let- 
ters A-F  can  be  typed  in.  If  you  press 
any  other  key  (with  some  exceptions 
noted  below),  you'll  hear  a  warning 
buzz.  To  simplify  typing,  the  numeric 
keypad  modification  from  the  March 
1986  "Bug-Swatter"  column  is  now  in- 
corporated in  the  listing.  The  keypad  is 
active  only  while  entering  data.  Ad- 
dresses must  be  entered  with  the  nor- 
mal letter  and  number  keys.  The  figure 
below  shows  the  keypad  configuration: 
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MLX  checks  for  transposed  charac- 
ters. If  you're  supposed  to  type  in  AO 
and  instead  enter  OA,  MLX  will  catch 
your  mistake.  There  is  one  error  that 
can  slip  past  MLX:  Because  of  the 


checksum  formula  used,  MLX  won't 
notice  if  you  accidentally  type  FF  in 
place  of  00,  and  vice  versa.  And  there's 
a  very  slim  chance  that  you  could  gar- 
ble a  line  and  still  end  up  with  a  combi- 
nation of  characters  that  adds  up  to  the 
proper  checksum.  However,  these  mis- 
takes should  not  occur  if  you  take  rea- 
sonable care  while  entering  data. 

Editing  Features 

To  correct  typing  mistakes  before  fin- 
ishing a  line,  use  the  INST/DEL  key  to 
delete  the  character  to  the  left  of  the 
cursor,  (The  cursor-left  key  also  de- 
letes.) If  you  mess  up  a  line  realty  badly, 
press  CLR/HOME  to  start  the  line  over. 
The  RETURN  key  is  also  active,  but 
only  before  any  data  is  typed  on  a  line. 
Pressing  RETURN  at  this  point  returns 
you  to  the  command  menu.  After  you 
type  a  character  of  data,  MLX  disables 
RETURN  until  the  cursor  returns  to  the 
start  of  a  line.  Remember,  you  can  press 
CLR/HOME  to  quickly  get  to  a  line 
number  prompt. 

More  editing  features  are  available 
when  correcting  lines  in  which  MLX 
has  detected  an  error.  To  make  correc- 
tions in  a  line  that  MLX  has  redisplayed 
for  editing,  compare  the  line  on  the 
screen  with  the  one  printed  in  the  list- 
ing, then  move  the  cursor  to  the  mis- 
take and  type  the  correct  key.  The 
cursor  left  and  right  keys  provide  the 
normal  cursor  controls.  (The  INST/ 
DEL  key  now  works  as  an  alternative 
cursor-left  key.)  You  cannot  move  left 
beyond  the  first  character  in  the  line.  If 
you  try  to  move  beyond  the  rightmost 
character,  you'll  reenter  the  line.  Dur- 
ing editing,  RETURN  is  active;  pressing 
it  tells  MLX  to  recheck  the  line.  You  can 
press  the  CLR/HOME  key  to  clear  the 
entire  line  if  you  want  to  start  from 
scratch,  or  if  you  want  to  get  to  a  line 
number  prompt  to  use  RETURN  to  get 
back  to  the  menu. 

Display  Data 

The  second  menu  choice,  DISPLAY 
DATA,  examines  memory  and  shows 
the  contents  in  the  same  format  as  the 
program  listing  (including  the  check- 
sum). When  you  press  D,  MLX  asks  you 
for  a  starting  address.  Be  sure  that  the 
starting  address  you  give  corresponds 
to  a  line  number  in  the  listing.  Other- 
wise, the  checksum  display  will  be 
meaningless.  MLX  displays  program 
lines  until  it  reaches  the  end  of  the  pro- 
gram, at  which  point  the  menu  is  redis- 
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played.  You  can  pause  the  display  by 
pressing  the  space  bar,  (MLX  finishes 
printing  the  current  line  before  halting.) 
Press  space  again  to  restart  the  display. 
To  break  out  of  the  display  and  get  back 
to  the  menu  before  the  ending  address 
is  reached,  press  RETURN. 

Other  Menu  Options 

Two  more  menu  selections  let  you  save 
programs  and  load  them  back  into  the 
computer.  These  are  SAVE  FILE  and 
LOAD  FILE;  their  operation  is  quite 
straightforward.  When  you  press  S  or  L, 
MLX  asks  you  for  the  filename.  You'll 
then  be  asked  to  press  either  D  or  T  to 
select  disk  or  tape. 

You'll  notice  the  disk  drive  startirig 
and  stopping  several  times  during  a 
load  or  save.  Don't  panic;  this  is  normal 
behavior.  MLX  opens  and  reads  from  or 
writes  to  the  file  instead  of  using  the 
usual  LOAD  and  SAVE  commands.  Dbk 
users  should  also  note  that  the  drive 
prefix  0:  is  automatically  added  to  the 
filename  (line  750),  so  this  should  not 
be  included  when  entering  the  name. 
This  also  precludes  the  use  of  @  for 
Save-with-Replace,  so  remember  to  give 
each  version  you  save  a  different  name. 

Remember  that  MLX  saves  the  en- 
tire workspace  area  from  the  starting 
address  to  the  ending  address,  so  the 
save  or  load  may  take  longer  than  you 
might  expect  if  you've  entered  only  a 
small  amount  of  data  from  a  long  list- 
ing. When  saving  a  partially  completed 
listing,  make  sure  to  note  the  address 
where  you  stopped  typing  so  you'll 
know  where  to  resume  entry  when  you 
reload. 

MLX  reports  the  standard  disk  or 
tape  error  messages  if  any  problems  are 
detected  during  the  save  or  load.  (Tape 
users  should  bear  in  mind  that  Commo- 
dore computers  are  never  able  to  detect 
errors  during  a  save  to  tape.)  MLX  also 
has  three  special  load  error  messages; 
INCORRECT  STARTING  ADDRESS, 
which  means  the  file  you're  trying  to 
load  does  not  have  the  starting  address 
you  specified  when  you  ran  MLX; 
LOAD  ENDED  AT  address,  which 
means  the  file  you're  trying  to  load 
ends  before  the  ending  address  you 
specified  when  you  started  MLX;  and 
TRUNCATED  AT  ENDING  AD- 
DRESS, which  means  the  file  you're 
trying  to  load  extends  beyond  the  end- 
ing address  you  specified  when  you 
started  MLX.  If  you  see  one  of  these 
messages  and  feel  certain  that  you've 
loaded  the  right  file,  exit  and  rerun 
MLX,  being  careful  to  enter  the  correct 
starting  and  ending  addresses. 

The  QUIT  menu  option  has  the  ob- 
vious effect — it  stops  MLX  and  enters 
BASIC.  The  RUN/STOP  key  is  dis- 
abled, so  the  Q  option  lets  you  exit  the 


program  without  turning  off  the  com- 
puter. (Of  course,  RUN/STOP-RE- 
STORE also  gets  you  out.)  You'll  be 
asked  for  verification;  press  Y  to  exit  to 
BASIC,  or  any  other  key  to  return  to  the 
menu.  After  quitting,  you  can  type 
RUN  again  and  reenter  MLX  without 
losing  your  data,  as  long  as  you  don't 
use  the  clear  workspace  option. 

The  Finished  Product 

When  you've  finished  typing  all  the 
data  for  an  ML  program  and  saved  your 
work,  you're  ready  to  see  the  results. 
The  instructions  for  loading  and  using 
the  finished  product  vary  from  program 
to  program.  Some  ML  programs  are  de- 
signed to  be  loaded  and  run  like  BASIC 
programs,  so  aU  you  need  to  type  is 
LOAD  "filename", 8  for  disk  or  LOAD 
"fileiiajne"  for  tape,  and  then  RUN. 
Such  programs  will  usually  have  a 
starting  address  of  0801  for  the  64.  Oth- 
er programs  must  be  reloaded  to  specif- 
ic addresses  with  a  command  such  as 
LOAD  "filename", 8,1  for  disk  or  LOAD 
"filename", 1,1  for  tape,  and  then  start- 
ed with  a  SYS  to  a  particular  memory 
address.  On  the  Commodore  64,  the 
most  common  starting  address  for  such 
programs  is  49152,  which  corresponds 
to  MLX  address  COOO,  In  either  case, 
you  should  always  refer  to  the  article 
which  accompanies  the  ML  listing  for 
information  on  loading  and  running  the 
program. 

An  Ounce  Of  Prevention 

By  the  time  you  finish  typing  in  the  data 
for  a  long  ML  program,  you  may  have 
several  hours  invested  in  the  project. 
Don't  take  chances — use  our  "Auto- 
matic Proofreader"  to  type  the  new 
MLX,  and  then  test  your  copy  thorough- 
ly before  first  using  it  to  enter  any  sig- 
nificant amount  of  data.  Make  sure  all 
the  menu  options  work  as  they  should. 
Enter  fragments  of  the  program  starting 
at  several  different  addresses,  and  then 
use  the  Display  option  to  verify  that  the 
data  has  been  entered  correctly.  And  be 
sure  to  test  the  Save  and  Load  options 
several  times  to  insure  that  you  can  re- 
call your  work  from  disk  or  tape.  Don't 
let  a  simple  typing  error  in  the  new 
MLX  cost  you  several  nights  of  hard 
work. 


MLX  For  Commodore  64 

SS  .1.0  REM  VERSION  .1.1,!  LINES  8 
30,950  MODIFIED,  LIMES  4 
85-487  ADDED 
EK  100  POKE  56,50iCLR!DIM  IN?, 

I,J,A,B,A5,BS,A(7),NS 
DM  1X0    C4  =  48!C6=.1.6!C7=7: 22-2:2 

4=254  !Z5"255i26<*256:Z7  = 

127 
CJ    .120    FA-PEEK  ( 45  )+Z6*PEEK(  46) 

J  BS=PEEK ( 55 ) +Z6  *PEEK ( 56 


SB  .1.30 


CO  .140 


FC  1.50 


EJ  160 


) iH$»"0I234S67a9ABCDEF" 
S5='CHR'5(J3)  jL$  =  "lLEFT)" 
:S5='"  ■':Ij5=CHR?C20)  !ZS= 
CKR5{0)  !T$="U3  RIGHT)" 
SD=54272!FOR  I=SD  TO  SD 
+23: POKE  1,0: NEXT: POKE 
{ SPACE fSD+24, 15 t POKE  78 
8,52 

PRINT" (CLR) "CHR5(142 )CH 
R5(8):POKE  532B0,15tPOK 
E  53281,15 
PRINT  TS"  [RED][RVS} 
(2  SPACES) §8  el 
{2  SPACES} "SPC( 28)" 
(2  SPACES  HOFF  J  IBLU)  ML 
X  II  iREDllRVSi 
(2  SPACES) "SPC( 28)" 
[12  SPACES] {BLU J" 
PRINT" 13  DOWN) 
t3  SPACES ICOMPUTEl 'S  MA 
CHINE  LANGUAGE  EDITOR 
(3  DOWNJ" 

PRINT"  (BLK) STARTING  ADD 
RESSE43"! :GOSUB300iSA=A 
DiGOSUB1040iIF  F  THENIB 
0 

PR1HT"(BLK) [2  SPACES lEN 
DING  ADDRESSg43"; sGOSUB 
300:EAhAD:GO5UB1030iIP 
[SPACE )F  then 190 
INPUT" [3  down) [BLK] CLEA 
R  WORKSPACE  [Y/N]i4i";A 
5:  IF  LEPT?tA5,l)<>-''Y"TH 
EN220 

PRINT" {2  DOWN) [BLU 3 WORK 
ING . . , " J ! FORI -BS  TO  BS+ 
EA-SA+7IP0KE  I,0tNEXT>P 
HINT "DONE" 

PRINTTAB(10)"(2  DOWN) 
[BLKKrVS]  MLX  COMMAND 
[ SPACE iMENU  { DOWN) 143 "i 
PRINT  T$"{RVS)E[OFF)NTE 
R  DATA" 

PRINT  T$"£RVSiDEOFP)lSP 
LAY  DATA" t PRINT  TS" 
[RVS)HOPF)OAD  PILE" 
PRINT  T9"(RVsJs(0PP)AVE 

PILE" I  PRINT  T5"(RVS)Q 
[0FF)UITl2  DOWN)[BLK)" 
GET  A5:IF  AS=NS  THEN250 
A=0!FOR  1=1  TO  5 1  IF  A?= 
MIDSi "EDLSQ", 1,1) THEN  A 
=1:1=5 

NEXT: ON  A  GOTO420,610,6 
90, 700 , 280 IGOSUB1060 :G0 
TO250 

PRINT"(RVSJ  QUIT  ":INPU 
T"[D0WN)i4iARE   YOU    SURE 

[Y/N]";A$:IP   LEFTS(A5, 
1)<>"Y"THEN220 
POKE   SD+24,0iEND 
IN$=NSiAD=0  JINPUTIN? :IF 
LEN  ( INS  )  0-4THENRETURN 
B?=INS !GOSUB320 !AD=A: BS 
-MI DS ( INS , 3 ) :C0SUB3  20 :A 
D=AD*256+A J  RETURN 
A=0:FOR   J«l    TO   2:AS=MID 
5 { B5 , J , 1 } : B=ASC { AS ) -C4+ 
(A?>"@")*C7:A=A*C6+B 
IF    B<0    OR    B>1S    THEN    AD= 
0:A=-1 !j=2 
NEXT: RETURN 

B=INT(A/C6) : PRINT  MIDSt 
HS,B+1,1};  !B"»A-B*C6iPRI 
NT  MID5 { H? , B+1 , i ) f 1 RETU 
RN 

A=INT(AD/Z6) :GOSUB3  50sA 
=AD-A*Z6:GOSUB3S0: PRINT 


BE  370  CK=INT(AD/Z6) iCK=AD-Z4* 

CK+Z5*(CK>Z7) :GOTO390 
PX  380  CK=CK*Z2+Z5*<CK>Z7)4.A 


FR  170 


JB  180 


GF  190 


KR  200 


PG  210 


DR  220 


BD  230 


JS  240 


JH  250 
HK  260 


FD  270 
EJ  280 


EM  290 
JX  300 

KF  310 


PP 

320 

JA 

330 

GX 

340 

CH 

3  50 

RR 

360 
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JC  390 
OS  400 


EX  410 
no   420 


JK  430 

SK  440 


GC  450 


Hh   460 

HD  470 
FK  4S0 

GS  435 


FX  486 

CM  487 

MP  490 

KC  500 

MX  510 

GK  520 

m  530 

QS  540 

PM  550 

QC  560 

PK  570 

HJ  580 

QQ  590 


GQ  600 
QA  610 


RJ  620 


KS  630 


CK='CK+Z5*tCK>ZS)  ! RETURN 

PRINT "[DOWN  J STARTING  AT 

E4|"; tGOSUB300jIF  IN5<> 

N?  THEN  GOSUB10301IF  F 

{ SPACE  JTHEN400 

RETURN 

PRINT" [RVS)  ENTER  DATA 

{SPACE 1"!GOSUB400 tip  IN 

5=N5  THEN220 

OPEN3,3tPRINT 

POKE1.98,0:GOSUB360!lF   F 

THEN    PRINT    IN? : PRINT" 
{UP] 15    RIGHT  I"; 
FOR    I~0    TO    24    STEP    3:B$ 
=S5jFOR   J=1    to    2!lF    F   T 
HEN    B?=MID5(IN$,I+J,l) 
PRINT"{RVS)"BSL5f !IF    I< 
24THGN    PRINT "{OFF}" J 
GET    A?! IF   AS-N5    THEN470 
IF(A5>"/"ANDA$<"5")OR(A 
S> "@"ANDAS  < "G" )THEN540 
A=-{A5="M")-2*(A5=", ")- 
3*(AS=".")-4*(AS="/")-5 
*(A5  =  "J")-6*tA?="K'') 
A»A-7*(A5="L")-B*{A5="t 
")_9*tA5="U")-10*(A5-"I 
")-ll*(A?«"0"l-12*{A5=" 
P") 

A=A-13*(A$«S5)iIF   A  THE 
N   A;=MID?("ABCD123E456F 
0",A,1):GOTO    540 
IF    AS=R5    AND({I=0)AHD{J 
=1)0R    F)THEN    PRINT    BS t i 
jB2iNEXTiI-24iGOT055a 
IF   AS="(HOMEl"    THEN    PRI 
NT    a5!J=2sNEXT:I=24iKEX 
T;Pa0iGOTO440 
IP (A5=" {right}" )ANDF    TH 
ENPRINT    B5L5; :GOTO540 
IF    A?<>L$    AND   A5<>DS    OR 
((I30)AND( J=l) JTHEN    GOS 
UB1060SGOTO470 
AS=L$+SS+L5tPRINT    B?L5; 
!Js2-JsIF   J    THEN    PRINT 
S SPACE lL5f !l«I-3 
PRINT    AS;iNEXT   JsPRINT 
{ SPACE  J  S? ; 

NEXT  IrPRINTtPRINT"JUPl 
{5  RIGHT)"; :INPUTt3, IN? 
!IF  IN?=N5  THEN  CUOSES t 
GOTO220 

FOR  1=1  TO  25  STEP3tB$- 
MID5(IN5,I) jGOSUB320iIF 

K25    THEN   GOSUB380iA(I 
/3)=A 

NEXT  t  IF  AOCK  THEN  GOSU 
B1060jPRINT"(BLK) ERVS] 
{space) ERROR:  REENTER  L 
INE  S4i":F=l:GOTO440 
GOSUBl 080 : B-BS+AD-SA ! FO 
R  1-0  TO  7 1  POKE  B+I,A(I 
) sNEXT 

AD"AD+8!lF   AD>EA   THEN    C 
LOSE3tPRINT"{DOWN) {BLU) 
**    END    OF    ENTRY    •*UlK} 
{2    DOWN)":GOTO700 
P=0!GOTO440 
PRI  NT '■  { CLR  J  { DOWN  )  { RVS  ) 
{SPACE)DISPLAY    DATA    "tG 
OSUQ400:IF    IN?=NS    THEN2 
20 
PRINT " i  DOWN } [ BLU ) PRESS i 

(RVS J  SPACE {OFF)  TO  PAU 
SE,  I RVS ) RETURN { OFF  J  TO 

BREAKE4i(D0WN)" 
GOSUB360iB=BS4-AD-SAlPOR 
I=BTO   B+7  :  A=3PEEK  ( I )  eGOS 
UB3S0tGOSU83e0tPRINT    S? 


CC    640    NEXTiPRINT"[RVSj"! lA-CK 

(GOSUB350JPRINT 
KH    650    F=liAD=AD+8iIF   AD>EA   TH 


ENPRINT"(D0WN) JBLU!**    E 
ND   OF   DATA    **"!GOTO2a0 
KC   660   GET   A5tIF   AS-R?    THEN   GO 

SUB10a0;GaTO220 
EQ   670    IF    AS-S5    THEN   F"»F+liGOS 

UB1080 
AD   660   ONFaOTO630,6e0,630 
CM   690   PRI NT "J DOWN) {RVS)    LOAD 

{SPACE) DATA    "iOP=l:GOTO 

710 
PC   700    PRINT "{ DOWN ){ RVS )    SAVE 

{SPACEJFILE    "jOP=0 
RX    710    IN5=NSi INPUT" {DOWN 3PILE 

NAMEE4i"fINStIF   IN5=N5 

E SPACE )THEN220 
PR    720    F=0iPRINT"(DOWN(lBLK) 

{RVS)T(OFf)aJ>E   or    {RVS  J 

Dj0FF)lSK!    £43" f 
FP    730    GET   A5!lF   A?-"T"THEN   PR 

INT "T { DOWN  3  * JGOTO880 
HQ    740    IF   AS<>"D"THEN730 
HH    750    PRINT"D{DOWMl"!OPEN15,8 

,15, "I0i"!B=EA-SA!lN5»" 

0:"  +  INS!lF  OP  THENe.l0 
SO  760  OPEN  1,8,S,IN5+",P,W"!G 

OSUB860I1F  A  THEN220 
FJ  770  AH=INT{SA/2S6)  jAL=.SA-{A 

H*256) iPRINTIl,CHR?(AL) 

;CHR5(AH); 
PE    780    FOR    1=0    TO   BjPRINT*1,CH 

R5(PEEK{BS+in fJlF   ST   T 

KEN800 
FC  790  NEXTjCLOSEI iCLOSElSiGOT 

0940 
GS    800   GOaUBl060!PRINT"EDOWNi 

{BLK) ERROR   DURING    SAVE: 

64i " SGO3UBS60  5GOTO220 
MA    810    OPEN    1,3,8,IN5+",P,R":G 

OSUB860!lF   A   THEN220 
GE    820    GET#l,A5,B5iAD=ASC(AS+Z 

S}+256*ASC(B5+Z?}iIF   AD 

OSA   THEN   F=liGOTO850 
RX    830    FOR    I"0    TO    BsGETIl.ASiP 

OKE   BS+I,ASC(A5+Z5) iIF( 

I<>B)AND   ST   THEN   F"2!AD 

=ItI=Q 
FA   840    NEXT  I  IF   ST064    THEN    F=3 
FQ   850    CLOSEl!CL0SE15:0N   ABS(F 

>0)+l  GOTO960,970 
SA  860  INPUT#15,A,A?JIF  A  THEN 
CLOSEl !CL0SE15 :GOSUB10 

60tPRINT"{RVSjERRORi     "A 

S 
GQ  870  RETURN 
EJ  880  POKEl 83, PEEK ( FA+2 >! POKE 

J.B7,PEEK{FA+3)  iPOKElBS, 

PEEK(FA+4) tIPOP=0THEN92 

0 
HJ    890    SYS    63466:IF(PEEK(783>A 

ND13THEN   GOSUB1060:PRIN 

T" {down) (RVS)    FILE    NOT 

{SPACE) FOUND    "s GOT 0690 
CS   900   AD=PEEK(829)+2  56*PEEK{8 

30)iIF   ADOSA   THEN    P»l> 

GOTO970 
SO    91,0   A=  PEEK  (831) +2  5  6*  PEEK  (83 

2)-l tF=F-2*(A<EA)-3«(A> 

EA) !AD=A-ADiGOTO930 
KM    920  A=SA:B=«EA+l!GOSUB1010:P 

OKE7e0,3sSYS    63338 
JF    930    A=BSjB=BS+{EA-SA)+1iG0S 

UB1010SON  OP  GOTO950:Sy 

3    63591 
AE    940    GOSUB1080tPRINT"{BLU)** 
SAVE    COMPLETED    •*"(O0T 

02  20 
XP    950    POKE147,0tSyS    63562 i IF 

( SPACE }ST>0    THEN970 
FR    960    GOSUB1080:PRINT"{BLU)** 
LOAD    COMPLETED    **"!GOT 

O220 
DP    970    GOSUB1060 SPRINT "(BLK) 


{RVS {ERROR  DURING  LOAD: 
{DOWN3i4|"iON  F  GOSUB98 
0,990, 1000 !GOTO220 
PP  980  PRINT "INCORRECT  STARTIN 
G  ADDRESS  < " f :GOSUB360 t 
PRINT")": RETURN 
GR  990  PRINT"LOAD  ENDED  AT  "m 
AD3SA+ADiGOSUB360 i PRI  NT 

D$! RETURN 
PD    1000    PRINT "TRUNCATED    AT    END 

ING    ADDRESS"! RETURN 
RX    1010   AH=INT (A/256 ) :AL=A-( AH 

*256) : POKEl 9 3, AL: POKEl 

94,  AH 
FF    1020   AH=INT(B/256) !ALaB-(AH 

*256) iPOKE174,ALi POKEl 

75, AH  I  RETURN 
FX    1030    IF    AD<SA   OR   AD>EA   THEN 

10S0 
HA   1040    IF{AD>S11    AND   AD<40960 

JOR(AD>49151    AND   AD<53 

248)THEN    GOSUB1080 !F=0 

! RETURN 
HC    1050    GOSU 61060! PRI NT "{RVS) 

(SPACE  3  INVALID   ADDRESS 
{ DOWN) { BLK ) " ! P=l I RETU 

RN 
AR    1060    POKE    SD+5,31iPOKE    SD+6 

,208:POKE  SD,240:POKE 

{SPACE  3 SD+ 1,4: POKE  SD+ 

4,33 
DX  1070  FOR  S=l  TO  100:NEXTiaO 

TO1090 
PF  1080  POKE  SD+ 5,8: POKE  SD+6, 

240! POKE  SD,0!POKE  SD+ 

1,90:POKE  SD+4,17 
AC  1090  FOR  S=l  TO  100:NEXTiPO 

KE  50+4,0! POKE  SD,0!PO 

KE  SD+1,0! RETURN 
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COLOR  RIBBONS  &  PAPER 

RIBBONS;  Rad,  Blue,  Grn.,  Brwn.,  PurplB,  YhI. 

Ribbons           Pric«  Each 

Black 

Colof 

Heat 
TfSnslei 

BfDiHerM1l09 

4.95 

5.95 

7.00 

C.  Itoh  Pfowritar  Jr. 

7.00 

9.00 

- 

Citiion  12OD/IB0D 

5.00 

6.00 

7,95 

Commodore  MPS  801 

4.50 

5.25 

5.75 

■  MPS  802(1526 

6.25 

7.25 

- 

■  MPS  803 

4.95 

5.95 

7.00 

■  MPS  tOOO 

3.95 

4.95 

6.75 

-  MPS  1200/1250 

5.00 

6.00 

7.95 

-  1525 

6.S0 

8,00 

- 

Epson  MXaOJLXeOO 

3.7S 

4.25 

6,75 

Okidata  82/92 

1.75 

2.25 

4.50 

Okidata  182/192 

6.50 

7.60 

- 

Panasonic  K-XP  1080 

6. 75 

7.75 

- 

SaikoEha  SP  800/1000 

5.25 

6.50 

7.96 

Star  SG10 

1.75 

2.2S 

4.50 

Star  NXIO/NIIO 

500 

600 

7.95 

Star  NX1000 

4.50 

5.50 

8.00 

Star  NXIOOOC  -  4C 

- 

10.75 

- 

COLOR  PAPER 

8RIGHT  PACK -200  Sheets;50  each  colo/:  Red, 

Blue.  Green,  Ycltaw.  9  1/2x11        -  S11.90/pk. 

PASTEL  PACK  -  20O  Sheets/SO  each  coloi.  Pink. 

Vellow,  Blue,  Ivory.  9  1/2x11         -  Sll.SOfpk. 

T-SHIflT  RIBBONS  1H«B(  TfBfu(«r|  -  fled.  Bluo,  Grn,, 

Brwn..  Purpts.  Yel..  Btk,  Call  For  Price  &  AvailiWity, 

COLOR  BANNER  BAND  PAPER  -  45  ft/roll-  S9.96/aa, 

For  nbbofis  &  paper  not  lislerJ  above,  call  1r>r  puce  & 

jvflrl  Price  Ir  soec.  subieci  10  change  w/0  notice.  Mm. 

orijei  525.00    (Win    S&H  43  50  mm.  Visa.  MC.  COD. 

RAMCO  COMPUTER  SUPPLIES 

P,0.  Box  475,  Manteno,  IL  60950   U.S.A. 

1  ■600-522-6922  •  815-468-8081 

Classified 


SOFTWARE 


FREE  PUBLIC  DOMAIN  SOFTWARE  -  Request 
free  cjUlog  or  send  S2  for  sample  disk 
and  talalog  (refundable).  C64-I2S.  CALOKE 
IND..  Dept.  ]K,  Box  18477,  K.C,  WO  64133 

COMMODORE:  TRY  BEFORE  VOL)  BUY.  Best 
selling  games,  utilities,  cduc'l  +  classics 
4  new  releases.  lOO's  of  tides.  Visa/MC/Disc 
Free  brochure.  RENT-A-DISC.  Frederick  Bldg. 
»222,  Hunt'n,  IVV  35701  (304)  529-3232 

FREE  SOFTWARE  FOR  C-64,  Send  one  stamp 
for  catalog  or  S2.00  for  30  sample  programs  and 
catalog  (refundable).  RVH  Publications,  4291 
Holland  Rd,  #562-G,  Virginia  Beach,  VA  23452 

RENT  6J/12S  SOiTWARE!  lOOO's  of  disks. 
Lowest  prices.  No  deposit  or  fee.  Free 
catalog,  Centsible  Software,  ['O  Bos  930, 
St.  Joseph,  Ml  491)S5  (616)  9HZ-0327. 

THOUSANDS  OF  PD  PROGRAMS  FOR  C64/128! 
We  have  Gan;ies,  Utilities,  Music  and  much 
more!  For  information  write:  Lightspeed 
Software,  POB  34042?,  Tampa,  PL  33694 

Thousands  of  C64/128  PD  programs  on  350  + 
disks.  Free  listing  or  SI  large  catalog. 
DISKS  O'PLENTY  INC.,  7958  Pines  Blvd., 
Suite  2  70 A,  Pembroke  Pines,  FL  33024 

C64/I28  FINEST  PUBLIC  DOMAIN  PROGRAMS 
Pretested  quality  programs  '  Most  $1.50  * 
•On  Disk  '  YOU  pick  the  programs  that  YOU 
want!!!  Free  diskfull  of  programs  with  first 
order!  For  a  list  +  Description  send  SASE  to: 
)I.Ff  Co.,  Dcpt.  G,  Bos  67021,  Topeka,  KS  66667 

64/ 12a  PD  SOFTWARE,  GAMES,  MUSIC,  UTIL., 
Educ.  &  Hm/Bus.  $3/disk  -  2/JS  +$2.50  s.h. 
Comp.  cat,  USA  $2,  other  $4  -  For  info  SASQ 
D  i  V  CompSoft,  PO  Bos  933,  Ardraore,  IN  18149 

FINEST  C-64/128  PUBLIC  DOMAIN  SOFTWAHEI 

As  low  as  SI. 25  per  disk  of  programs.  For  a 
Free  CATALOG  write  to:  KOALA  ENTERPRISES 
Rt.  2,  Box  677,  Carencro,  LA  70520 


WordStar'"-  V2.26  For  C-12B  339,95     S4.50 


p/h,  rubllc  Domain  soitwaro  copylriQ  Qq, 
33  Gold  St.,  Ste.  L3,  New  York,  NY  10038 
"•MfcroPro®  800-221-7372 


D,'.'    WtN  LOnO  K1LLI0NS! 
—     '   LOnO  PICKER  PLUS  »Z.1 

Lotto  Pictei  Plus,  Ihc  otiginal  lottery 
selection  software,  alfaws  you  to  store 
winning  Lo!to.  Keno,  &  Pick  3./4  numtiets 
S  choose  between  ttitee  mtxies  ol  pJOtja&lit/ 
analysis  (hot.  due.  unbiased)  in  oidet  to  give  you 
the  winning  edge!  Guaranleed  to  work  tor  all  lotteries. 
Bonus  numbers  are  easily  handled  and  our  full-loalured 
database  editor  giues  you  access  lo  your  files.  We  qive 
yuu  the  PICKS— rrat  a  lnjnch  ol  jumbled  stabslicsi  S3*.8S 
(-5.55  s/h).  &4/128.  IBM,  MK  Apple  II.  NY  res.  add  tax. 
fvOT  Cupy- protected. 

OflDER  TDfJAT!  l-80n-634'Sil63  Bll  Z93  (M-F  8-5) 
GE  RIDGE  SERIflCES,  INC.,  170  Broadway 
Suite  20FCG.  fJew  York.  NY  1003fl 
Info./teaiers  718-317-1961 

THE  BEST  PD  PROGRAMS  FOR  C64/12B/CPM. 
Arcade  type  game  a,  utilities,  etc.  For 
sample  disk  &  catalog,  send  $2  to:  ONLY 
THE  BEST,  PO  Box  3S8.  Peoria,  IL  61851-0353 

QUALITY  GAMES  FOR  THE  COMMODORE  64 
Low  prices,  high  quality.  For  free 
catalog  send  1  stamp  to:  Quality  Games 
3560  Savage  Ave.,  Pinole,  CA  94564 

THE  HOTTEST  EUROPEAN  64/138  PD  QAMESI 
8-10  QUALITY  GAMES  on  DS  disks  lor  only  $51 
For  a  FREE  SAMPLE  and  CATALOG  write  lo; 
TFIE  QAIWE  SHOP,  Box  491,  New  Yori(,  NY  11375 

GLOBAL  THERMONUCLEAR  WARFARE 
LAUNCHED  FROM  YOUR  C-64/128  WITH 
ENDOTHERM.  GREAT  GRAPHlCS-f-SOUND 
HFFECr  S.  FREE  S  +  H.  OMI.Y  S7   MONOLITH, 
P.O.  BOX  841  HANSON,  MA  02341 

C-64  PROGRAMMFRS  -  10  BORDERS  IN  BASIC 
with  tutorial.  Disk  is  filled  both  sides 
with  utilities  &  games.  $4.95  Postpaid. 
PMP.  220  Chaucer,  Elyria,  OH  44035-4722 

C64,  C12e  &  CPM  PUBUC  DOMAIN  SOFT- 
WARE. Free  Catalog,  fast  service,  low  prices,  6t 
unbelievable  specials.  Computer  Active, 
Box  893  C,  Clinton,  OK  73601 

MUSIC  LOVERSI  MIDI  YOUR  C84/12S.  We  have 

music  Slid  ware,  Midi  interfaces,  hundreds 
of  pre-programmed  songs,  Catalog-Sl.OO. 
MIDI  Inn.  Box  2362CG7,  Westmont,  IL  60559 


COMPUTEI's  Gazette  Classified  is  a  low-cost  way  to  tell  over 
220,000  microcomputer  owners  about  your  product  or  service. 

Rates:  $25  per  lino,  minimufn  of  four  linos.  Any  or  all  of  the  first  line  set  in  capital  letters 
at  no  charge.  Add  $15  per  line  for  boldface  words,  or  $50  (or  Ihte  entire  ad  set  in  bold- 
face (any  number  of  lines.)  Inquire  about  display  rates. 

Terms:  Prepayment  is  required.  Ctieck,  money  order,  American  Express.  Visa,  or 
MasterCard  is  accepted.  Make  checks  payable  to  COMPUTE!  Publications, 

Form:  Ads  are  subject  to  publisher's  approval  and  must  be  either  typed  or  legibly 
printed.  One  line  eqitais  40  tetters  and  spaces  between  words.  Please  underiine  words 
to  be  set  in  boldface. 

General  Infof  mation:  Advertisers  using  post  office  box  numbers  in  their  ads  must  supply 
permanent  address  and  telephone  numbers.  Orders  will  not  be  acknowledged.  Ad  will 
appear  in  next  available  issue  after  receipt 

Closing:  3rd  of  the  third  monlh  preceding  cover  dale  (e.g.,  June  issue  closes  March  3rd). 
Send  order  and  remittance  to:  Kathleen  Ingram,  Classilied  Manager,  COMPUTEI's 
Gazette.  PC  Box  5406,  Greenstjoro,  NO  27403.  To  place  an  ad  by  phone,  call  Kathileen 
Ingram  at  (919)  275-9809 

Notice:  COMPUTE!  Pubfications  cannot  be  responsible  for  offers  or  claims  of  advertisers, 
but  will  attempt  to  screen  out  misleading  or  questionable  copy. 

Classified  Display  Rates:  Classified  dispiay  ads  measure  2'A"  wide  and  are  priced 
according  to  height.  1"  =  $250:  V/i"  =  $375:  2"  =  $500:  3"  =  $600;  ($100  for  each 
additiona!  inch,  e.g.  4"  =  $700,  etc )  Preferred  supplied  materia!  is  \felox  or  PMT. 


WHAT  HAPPENED  WHEM  YOU  WEBI  BORN? 


I  Vbu  cati  lind 

out  w]U  rns  TIME  TRAVELER  corrpyler  ^ograirt  Iron  NCI. 
ici-s  yoj  Academy  iVraitt.  World  Series  Mnnas,  ptttes.  presi- 
dents, ticadlines,  annual  income,  avg.  cost  ol  tiorrte.  calendar, 
much  more.  190[)-t989  Sell  printout  at  Ilea  mkts.  stiows,  b/ 
mail  Cereal  parly  gi(t<  Sarxl  S49  tor  diik,  or  SASE  lot  printout 
Also  includes  IRlvIA  qan;e  tducatronal.  miEiesiinq  For  C64 
&  128  or  IBM.  wil'i  :-.n,  crnlEr  fJol  copy  protKtdl 


WATIONWIDE  COrvlPUTER  INDUSTRIES 


205  McCormick  Avenue.  Dept  71,  Hawkinsville,  GA,  31036 
(913)  783-1156  Visa.,'MC/Chcck 

SlNQERSl-EASIEST  WAV  TO  LEARN  YOUR 
PART  Play  your  part  only,  or  all  3  parts,  C-64 
Disk.  EZest  music  entry.  S14.95  +  $3  p&h,  CA 
residents  add  \.w.  ZWETZIC  ASSOCIATES 
Dept.  S,  5'J33  Hnms  Ct.,  Oakland,  CA  94611 


HARDWARE 


COMMODORl; /AMIGA  CHIPS,  REPAIRS 
flat  rates  (C64;  $49,95 -HUPS),  parts. 
Send  for  free  catalog.  Kasara  Mlcro- 
syslems  (Div.  of  QEP)  9  Kay  Fries  Dr.. 
Slo^y  Point,  NY  10980.  800-248-2983. 


COMPUTER  REPAIR 


C-64  REPAIR  $39.95  FLAT  RATE.  1541/1571- 
S49.95,SX64-Sfi9,95;128-S64.95.  24  Hr  turn- 
around. 90  dy  warranty.  A&M  Computer  Repair, 
2U  Guernsey,  New  Windsor,  NY  12550,  914-562-7271 

Authorised  Rep«lra  C64/12B:  S50  &  SSS;  1541/ 
1571:  $55  St  $65;  SX64,  128D,  Anviga,  PC:  SCall 
816-872-63n.  Quick  Serv.  30  day  warranty. 
We  buy,  sell,  trade.  MOM  &  POP's  COMPUTER 
SHOP,  Rt.  2,  Box  1 19,  Cainsville,  MO  64632 


COMPUTEI's  Gazette  is 
looking  for  utilities,  games, 
applications,  educational 
programs,  and  tutorial 
articles,  If  you've  created 
a  program  that  you  think 
other  readers  might  enjoy 
or  find  useful,  send  it,  on 
tape  or  disk,  to: 


Submissions  Reviewer 
COMPUTE!  Publications 
P.O.  Box  5406 
Greensboro,  NC  27403 


Please  enclose  an  SASE  if 
you  wish  to  have  the 
materials  returned. 
Articles  are  reviewed 
within  four  weeks  of 
submission. 
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Give  us  5 
. . .  we'll  aive  vou  101  "^ 


S^ 


-^^ecv 


Call  our  toll-free  number  now, 
and  receive  10%  more  S  for 
your  trade-In!  Just  give  us  5 
reasons  why  Computer 
Repeats  Is  Anierica's  source 
for  ^ew  and  Used  Compu- 
ter Equipment!  Need  a 
hint?  Read  on  ...... . 

B  GujrarLteed  lowi'Stpncesvtitn  trade  m 


of  £  100  or  mofa. 


ftvo' 


11)5*  ■ 


*"***■  t^O'^ 


P* 
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A  CO 


TrjOe^tn  your  systerr  for  arythirlff 
^  seiJ  -free quotes. 

iQ  Full  prcxiiict  hrws'ptus  dut^onze<] 
S3l(!j  a-  servicc-of  Commodore/ 
Amiga  and  At^rl 
S^ashS  foi  your  equipment. 
m  2J-nr  online  crcef]rvg  BBS 
Prpr-e[303.]939B174. 
IB^IO-day  home  trial, 
fa^Frpe  tKlink^t  support. 
EZ  IDOO  s  of  software  S  bco>'^ 
irdes,  3^up. 

ffl^Fd^t,  low-cojt  (Je!tvei>. 
fZ  CnrpDfdte  &  ^utatiundl 

13  'VFi  rr^^w  cndit  c^ds 
acceptft3 

^  10  00 '3  or  sBtisfii'd 
customers. 
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Repeats 

1  -800-347-3457 


cnnncirdi  Questions?  Call  (303)  939-8144 
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FACTORY  AUTHORIZED 

COMJVIODORE  REPAIR  CENTER 

1-800-772-7289 


C64  Repair  miDuti 

C-tza  Repair iK.oNiYi.  64.95 

1541  Permanent 
Alignment    29.95 

1541  Repair 79.95 

1571  Repair 79.95 


(312}  879-2888  IN  ILLINOIS 

42.95      ci2aD  Repair  CALL 

Amiga  Repair    CALL 

Primers CALL 

Monitors CALL 

Other  Equipment . .  CALL 


CALL  BEFORE  SHIPPING  FOR  AL/THORIZATION  NUMBER 

jHavic  Scrlj^l  and  C^ird  Afurtibpn  reiidyl 

PARTS  AND  LABOR  INCLUDED 

FREE  RETURN  SHIPPING 

lAPO,  FPO,  AM  ADD  ttO.OO| 

24-48  HR,  TURNAROUND 

ISubJect  to  P»ns  Availability) 

30  DAY  WARRANTY  ON  ALL  REPAIRS 


COMMODORE  PARTS 

CALL  (312)  879-2350 

C-64  Power  Supply 34,95* 

Ct28  Power  Supply 59,95* 

Other  Pans   CALL 

'fPlui  S3.D0  Slilpplng/HandllngI 

TEKTONICS  PLUS,  IfMC. 

150  HOUSTOW  STREET 

BATAVIA,  IL  60510 


MoitarCatilil 
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ITawX  Can  Your 

^"*^         Computer  Make 

^^„^/  YOU 

S;$i,000,i 

1>     WITH  LOTTERY  PC  YOUR  NEXT  TICKET 

COULD  BE  WORTH  MILLIONS! 
LOITEFIV  uses  W  D'.vJJowi  ar;  StOHin'  m  ,i:,/ 

computei  KHlewiniiic  niKliciinisUieniinilx:'  siiiiicinin 
meitiods  thai  liil'ivin  me  v.miih  tottwy  ijjmiii  you 
play  Don  I  no  Rmitc-il  ;()  ti:e  im  or  two  methods  lh,it 
oihei  pmgiamsuse,  itujj  mn)!-!!  noi  miik  m  yom  stale 
Iheie  IS  no  liBttei  systar  aviiilable! 
Join  !he  gioi'.ing  Us  I  fA  wnnois  using  out  system 

SPECIFY 

I  oiieiy  fi^iCG'V128)  •  LottB^  -t-lifius  -i 
LolteiyST  Alsii)  •  UfflgnVC 
IBM  PC -HI  A I  yiii  (aimpatlOies 

C(in-^WK)«eti-i/i;''i ',  PI,;'  ■■!  m  tatiisifired 
yuiSiKni^  ■'  0 j^ei^i 

IRV^O/XT  A,T  jii;  lafliiicreitRSiiBinaikS  Ot 
IfHWratiunai  Husjnes;.  tiAwtSmos  Inc 

fltaii  SI  Is  a  .-egisiciat  irartoiTiart  bl  flian  Coip 


lo  Older  sand  SZ9  Di)  Ifli  each  (tlus  S3  00  (MEiage  S 

hand  ling  \w  offjei  to 

ililinois  (CEidentE  add  B^'o  sales  taxi 

"OifleiE  0u1sirt9  Worih  JSmeiico  add  S3  00. 


&^b 


COD  orders  call 
(312)566-4647 

Supenof  Micro  Systems,  Inc 

PO  Boi  (13  ■  WMti.na  II  60O9O 


Jt 


GET  MORE 
PLEASURE 
FROM  THE 
BIBLE  WITH 


LANDMARK 

The  Computer  Reference  Bible 

HcTE'i  wh»i  lANOHABK  wUl  emhle  you  lo  doi 

•  SEARCH  THROUGH  THE  BIDLE—Find 

Phfuca^  word4  or»cntcnce». 

•  DEVELOP  TOPICAL  FILES— Copy  from  The 

Bible  Eext  2nd  seirch  rc£ulu  then  ^d  your 

own  comments  and  notes. 

v'  COMPILE  YOUK  PERSONAL  BIBLE -- 

Outline  texts  In  color.  Add  notes, 

comrTienEs,  and  references.  Mike  your  Bible 

Study  organized  <md  on  pcrmifnent  record! 

•  CRHATE  i-lLES—  Convert  itiem  for 
wordproccuofs  like  Paperclip  and  CEOS. 

•  MAKE  SLTPLEMENTAJtY  STUDY  FILES— 

For  sped  Re  study  and  develop  translation 
vartattons. 

NEW  LOW  PRICE! 

$119.95 

vl.2  rorC64  anti  v2.ororC128 

CALL  OK  WRm:  TODAY  FOR  A 

FREE  BROCHURE,  WHICH  SHOWS 

HOW  VALUABLE  LANDMARK  CAN 

BE  IN  YOUR  BIBLE  STUDY 
P.A.V.Y.  Software  P.O.  Box  1584 
nallwin,  MO  63022  (314)  527-'1505 
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The  Automatic  Proofreader 


Philip  I.  Nelson 

"The  Automatic  Proofreader"  helps 
you  type  in  program  listings  for  the 
128,  64,  Plus/4,  and  16  and  prevents 
nearly  every  kind  of  typing  mistake. 

Type  in  the  Proofreader  exactly  as 
listed.  Since  the  program  can't  check  it- 
self, type  carefully  to  avoid  mistakes. 
Don't  omit  any  lines,  even  if  they  con- 
tain unfamiliar  commands,  After  finish- 
ing, save  a  copy  or  two  on  disk  or  tape 
before  running  it.  This  is  important  be- 
cause the  Proofreader  erases  the  BASIC 
portion  of  itself  when  you  run  it,  leav- 
ing only  the  machine  language  portion 
in  memory. 

Next,  type  RUN  and  press  RE- 
TURN. After  announcing  which  com- 
puter it's  running  on,  the  Proofreader 
displays  the  message  "Proofreader 
Active".  Now  you're  ready  to  type  in  a 
BASIC  program. 

Every  time  you  finish  typing  a  line 
and  press  RETURN,  the  Proofreader 
displays  a  two-letter  checksum  in  the 
upper-left  comer  of  the  screen.  Com- 
pare this  result  with  the  two-letter 
checksum  printed  to  the  left  of  the  line 
in  the  program  listing.  If  the  letters 
match,  it's  almost  certain  the  line  was 
typed  correctly.  If  the  letters  don't 
match,  check  for  your  mistake  and  cor- 
rect the  line. 

The  Proofreader  ignores  spaces  not 
enclosed  in  quotes,  so  you  can  omit  or 
add  spaces  between  keywords  and  still 
see  a  matching  checksum.  However, 
since  spaces  inside  quotes  are  almost  al- 
ways significant,  the  Proofreader  pays 
attention  to  them.  For  example,  10 
PRINT'THIS  IS  BASIC"  will  generate 
a  different  checksum  than  10 
PRINT'THIS  ISBA       SIC". 

A  common  typing  error  is  transpo- 
sition—typing two  successive  charac- 
ters in  the  wrong  order,  like  PIRNT 
instead  of  PRINT  or  64378  instead  of 
64738.  The  Proofreader  is  sensitive  to 
the  position  of  each  character  within  the 
line  and  thus  catches  transposition 
errors. 

The  Proofreader  does  rwt  accept 
keyword  abbreviations  (for  example,  7 
instead  of  PRINT).  If  you  prefer  to  use 
abbreviations,  you  can  still  check  the 
line  by  LlSTing  it  after  typing  it  in, 
moving  the  cursor  back  to  the  line,  and 
pressing  RETURN.  LlSTing  the  line 


substitutes  the  full  keyword  for  the  ab- 
breviation and  allows  the  Proofreader 
to  work  properly.  The  same  technique 
works  for  rechecking  programs  you've 
already  typed  in. 

If  you're  using  the  Proofreader  on 
the  Commodore  128,  Plus/4,  or  16,  do 
mi  perform  any  GRAPHIC  commands 
while  the  Proofreader  is  active.  When 
you  perform  a  command  like  GRAPH- 
IC 1,  the  computer  moves  everything  at 
the  start  of  BASIC  program  space— in- 
cluding the  Proofreader — to  another 
memory  area,  causing  the  Proofreader 
to  crash.  The  same  thing  happens  if  you 
run  any  program  with  a  GRAPHIC 
command  while  the  Proofreader  is  in 
memory. 

Though  the  Proofreader  doesn't 
interfere  with  other  BASIC  operations, 
it's  a  good  idea  to  disable  it  before  run- 
ning another  program.  However,  the 
Proofreader  is  purposely  difficult  to  dis- 
lodge: It's  not  affected  by  tape  or  disk 
operations,  or  by  pressing  RUN/ 
STOP-  RESTORE.  The  simplest  way  to 
disable  it  is  to  turn  the  computer  off 
then  on.  A  gentler  method  is  to  SYS  to 
the  computer's  built-in  reset  routine 
(SYS  65341  for  the  128,  64738  for  the 
64,  and  65526  for  the  Plus/4  and  16). 
These  reset  routines  erase  any  program 
in  memory,  so  be  sure  to  save  the  pro- 
gram you're  typing  in  before  entering 
the  SYS  command. 

If  you  own  a  Commodore  64,  you 
may  already  have  wondered  whether 
the  Proofreader  works  with  other  pro- 
gramming utilities  like  "MetaBASIC." 
The  answer  is  generally  yes,  if  you're 
using  a  64  and  activate  the  Proofreader 
after  installing  the  other  utility.  For  ex- 
ample, first  load  and  activate  Meta- 
BASIC, then  load  and  run  the 
Proofreader. 

When  using  the  Proofreader  with 
another  utility,  you  should  disable  both 
programs  before  running  a  BASIC  pro- 
gram. While  the  Proofreader  seems  un- 
affected by  most  utilities,  there's  no 
way  to  promise  that  it  will  work  with 
any  and  every  combination  of  utilities 
you  might  want  to  use.  The  more  utili- 
ties activated,  the  more  fragile  the  sys- 
tem becomes. 

The  New  Automatic  Proofreader 

10    VEC=P1;EK(772)+2G()*PEEK(77J) 
:L0»43iHI=44 


20    PRINT    "AUTOMATIC    PROOFREADE 

R   FOR    ";!iF   VEC=42364    THEN 

{ SPACE  1  PRINT    ■•C-54" 
30    IF    VECo50556    THEN    PiUNT    "VI 

C-20" 
40    IF    VEC=3SlSa    THEN   GRAPHIC    C 

LR:  PRINT    "PLlJS/4    &    16" 
50    IF   VEC=17165    THEN    LO=45:HI= 

46!GRAPHIC    CLR:PRINT"128" 
60    SA=(PEEK{L0J  +  256*PEEK(I1I>)  + 

6!ADR=SA 
70    FOR   J=0   TO    166: READ    BVTiPOK 

E   ADR,[3YTsADR=ADR+l  iCHK=CHK 

+DYT!NE.XT 
80    IF    CHK<> 20570    THEN    PRINT    "* 

ERROR*   CHECK   TYPING    IN    !>ATA 
STATEMENTS": END 
90    FOR   J=I    TO    5; READ    RF,LF,HF: 

RS=SA+RF!HB=INT(RS/256) ;LB= 

RS-(256*HB) 
100  CHK=CHK+RF+LF+HF!POKE  SA+L 

F, LB: POKE  SA+HF, HBjNKXT 
110  IF  CHK<> 22034  THEN  PRINT  " 

•ERROR*  RELOAD  PROGRAM  AND 

(SPACE)CHECK  FINAL  LINE"iEN 

D 
120  POKE  SA+149,PEEK(7  72} :POKE 

SA+150,PEEK(773) 
130  IF  VEC=17165  THEN  POKE  SA+ 

14, 22: POKE  SA+ 18,23 : POKESA+ 

29,224:POKESA+139,224 
140  PRINT  CHR?(147};CHR5(17);" 

PROOFREADER  ACTIVE": SYS  SA 
150  POKE  HI, PEEK ( HI )+l J  POKE  (P 

EEK(L0)+256*PEEK!HI ) J -1 ,0:N 

EW 
160  DATA  120.169,73,141,4,3,16 

9,3,141,5,3 
170  DATA  88,96,165,20,133,167, 

165,21,133,168,169 
1B0  DATA  0,141, 0.255, 162, 31, IB 

1 ,199,157,227,3 
190  DATA  202,16,246,169.19,32, 

210,255,169,18, 32 
200  DATA  210,255,160,0,132,180 

,132, 176,136,230,150 
210  DATA  200,185,0,2.240,46,20 

1,34,208,8,7  2 
220  DATA  165,176,73,255,133,17 

6,104,72,201,32,208 
230  DATA  7,165,176,208,3,104,2 

08.226,104, 166,180 
240  DATA  24,165,167,121,0,2,13 

3,167, 165,168, 105 
250  DATA  0,133,169,202,208,239 

,240,202,165, 167,69 
260  DATA  168,72,41,15,168,185, 

211,3,32,210,255 
270  DATA  104,74,74,74,74,168,1 

85,211,3,32,210 
200  DATA  255,162,31,189,227,3, 

149,199,202,16,243 
290  DATA  169,146,32,210.255,76 

,86,137,65,66,67 
300  DATA  68,69.70,71,72.74,75, 

77,80,81,82,83,88 
310  DATA  13,2,7,167,31,32,151, 

116, 117, 151,128,129, 167, 1 36 

,137  G 
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BEFORE  TYPING  .  .  . 
Before  typing  in  programs,  please 
refer  to  "How  to  Type  In 
COMPUTE! 's  Gazette  Programs," 
elsewhere  in  ttiis  issue. 


SFX  Machine 


Article  on  page  50. 

FH  10  REM  COPYRIGHT  1939  COMPU 

TE!  PUBLICATIONS,  INC,  - 
ALL  RIGHTS  RESERVED 
RF  20  PRINT"(CLR}":B=532a0:POK 

EB, 15;POKEB+1,12:POKEB-1 

S,91:B1=B+2:H2=B+4!C=646 

:D=49152 
OS  30  FORJ=0TO10:READU:POKED+J 

, N! NEXT :DATA169, 0,160, 23 

,153,0,212,136,208,250,9 

6 
GQ  40  X=21l!Y-214:POKEC,l:POKE 

B2,2:POKEY,9:PRINT 
GJ  50  PRINTTAB(a)"{RVS) 

(25  SHIFT-SPACE}" 
GR  60  PRrNTTAB(8)"lRVS} 

(SHI  FT -SPACE) COPYRIGHT  1 

989  COMPUTE! 

{shift-space!" 
qp  70  printtab(8) "(rvs} 
(25  shift-space)" 

PD  80  a"l:E=82B:K=256:RS=CHRS( 
13) :PS=CHR$(32) :m=1.005: 
A=40:NK=64:KB=197sV=S427 
2 

AA  90  V1»V+1!V2bV;V3=V+8:V4=V+ 
7:R=RMD [-T1) 

QM  100  H1S="(RVS} {SHIFT-SPACE} 
NEW{SHIFT-SPftCE}SFX 

"(shift-space}  ":m25  =  " 
(rvs} (shift-spaceIkey 

[5HIFT-SPACE}5FX 
{SHIFT-SPACE}":M3S=" 

{rvs) (SHI  ft -space} saved 
1shift-space}sfx 
(shi  ft -space) keys 
{shift-space)" 

CJ  110  DIMFltA) ,F2(A) ,F3(A) ,F4 
(A) ,G1(A) ,G2(A) ,G3(A) ,G 
4(A) ,H1(A) ,H2(A) ,H3(A) , 
H4(A) 

AH  128  F0RT''1T0A:READN:N1  =  H*M: 
N2-N*2:H3-N*2*M:N4=INT( 
N/2) :N5=INT(N/2*M) 

SS  130  Fl (T)=INT (N/K) :F2(T)=N- 
(Fl (T)*K) :F3(T) = I  NT (HI/ 
K)  :F4 (T)=INT (N1-(F3  [T)* 
K)) 

BQ  140  G1{T)=INT (N2/K) :G2(T)=H 
2-(Gl{T)*K) :G3(T)=INT(N 
3/K) :G4 (T)=INT (N3-(G3(T 
)*K)) 

SC  150  HI  (T)  =INT(N4/K)  :H2(T)=t) 
4-(Hl(T)*K) :H3(T)=INT(N 
5/K}  :H4 (T) =INT (N5- (H3 (T 
)*K)) 

BK  160  NEXT!GOSUB570:GOSOB6S0 

PH  170  DATA2145, 2273, 2408, 2551 
,2703,2864,3034,3215,34 
06,3608,3823,4050,4291, 
4547 

EB  180  DATA4817, 5103, 5407, 5728 
,6069,6430,6812,7217,76 
47,8191,8  58  3,90  94,9634, 
10207 

BG  190  DATA10814, 11467, 12139,1 
2860,13625,14435,15294, 
16203,17167,18188,19269 
,20415 

DJ    200    SY^49152:POKEV+23,PO(I) 


:POKEV+24,VO(I) 
AQ    210    GETA5:IFAS=""THEN210 
RH    220    IFVA[.(AS)>0THENGOSUB550 

:GOTO200 
JC    230    IFA$  =  "I,"THENGOSOB1200:G 

OTO200 
DO    240    P0KEV+5,AD(I) :P0KEV+6,S 

R(I) ;P0KEV+12,AD(I) ; POK 

EV+13,SR(I) :P0KEV+3,DB( 

I) 
FJ  250  POKEV+10,DC[I) :P0KEV+17 

,DD(I) :P0KEV+14,VI (I) :P 

0KEV+1B,VS(I) 
DQ  260  IFAS="+"THENT=T+1:IFT>A 

THENT=A 
PC  270  IFA$="-"THENT-T-l!lFT<l 

THENT=1 
GJ  280  IFA$="+"ORA5="-"THBN320 
AS  290  IFA5=RSTHENI=0:GOSUB6aa 

:P0KEY,8:PRINT:^=»Z  +  1 
QQ  300  IFA$=RSTHENPOKEC,7:P0KE 

B1,1;PRINT"(4  SPACES}"M 

IS; 2" (LEFT)  ":GOTO200 
HD  310  IFA$  =  "S"THENGOStfB1070:G 

OTO200 
MK  320  ONOC(I)GOTO330,340,350 
P8  338  P0KEV1,F1{T) :POKBV2,F2( 

T) :POKEV3,F3{T) :POKEE,F 

3  (T)  :POKBV4,P4 (T)  ! GOTO 3 

60 
HQ  348  P0KEV1,G1 (T) :POKEV2,G2( 

T) !POKEV3,G3 (T) :POKEE,G 

3{T) :POKEV4,G4 (T) :G0T03 

60 
HE  350  P0KEV1,H1 (T) :P0KEV2,H2( 

T) :POKEV3,H3 (T) :POKEE,H 

3  (T)  :POKEV4,H4 (T) 
MC  360  ONZ(I)GOTO400,37a,3e0,3 

90,370 
QF  370  POKEV+15,Fl(T)/.7:GOT04 

00 
PB    380    POKEV+15,FUT)/2:GOTO40 

0 
XF    390    P0KEV+11,W2(I) :F0RJ=1T0 

50:  NEXT 
FA  400  IFA5<>RSTHENP0KKV+4,W1( 

I) :P0KEV+11,W2(I) 
BD  410  ONFL(I)GOTO420,430,44O, 

450 
FD  420  GOSUB530:GOTO460 
FP  430  FORUalTOSL(I)STEP10:POK 

F.V  +  22,U:NEXT:GOTO4  60 
KD  440  J=1:L=25S:FORU-1TO10:PO 

KEV+1,J!P0KEV+3,L:J=J+I 

1  (I)  !L  =  L-I2(I)  :NEXT:GOT 

0460 
BB  450  P0KEV3,PEEK(E)/2 
DE  460  IFZ(I)=2THENF0RU=1T0SL( 

I)STEPXT(r)  !P0KEV+1,IJ:N 

EXT 
XP  470  IFZ (I)=5THENF0RU=SLtI)T 

OISTEP-XT ( I) : POKEV+23 , 1 

:POKEV+l,U:POKEV+2  3,PO( 

I) :NEXT 
EM  4H0  IFPEEK{KB)  <>NKTliEN4e0 
OS  490  IFZ  (I) =6THENPOKRV  +  4,21: 

POKEV+11,21 
MM  500  P0KEV+4,W1 (I) -1:P0KEV+1 

1,W2(I)-1 
ME  510  IFAS="R"THENGETBSjIFB$= 

""THEN320 
RC  520  GOTO210 
HE  530  POKEV,PEEK(V+27) :POKEV+ 

7,PEEK(V+27) !IFPEEK(KB) 

ONKTHBNS30 
QJ  540  RETURN 
EB  550  1=VAL(AS)  :  IFOC  !I)=OTHEN 

I=a:RETURN 
AK  560  T=T  [I) :P0KEY,8:PRINT:P0 

KEC , 3 : P0KEB2 , 0 : PRINT" 

(4  SPACESj"M2S;I"{LEFT) 

(2  SPACES)  "iPOKECi:  RET 

URN 


RK  S70  POKEC,l!PRINT"{CLR} 

( DOWN )  { RVS ] SPACE ( OFF } 
(SPACE  }T0  HEAR  SFX 
(5  SPACES) {RVS}+{OFF)  T 
0  RAISE  PITCH 

ES  5B0  PRINT" {DOWN)  (RVS}S 
{OFF}  TO  SAVE  SFX 
{9  SPACES) {RVS) -(OFF)  T 
0  LOWER  PITCH 

CG  590  PRINT" (DOWN)  {RVS)L 
(OFF)  TO  LOAD  SFX 
[7  SPACES) {RVS)RETURN 
{OFF)  FOR  NEW  SFX 

JD  600  PRINT"{DOWN}  lRVS}R 

{OFF)  TO  REPEAT  SFX  (AN 
Y  KEY  TO  STOP) 

MX  610  PRINT" 


FH  620  IFS$'>""THENPOKEY,a:PRIN 
T:P0KEC,7;P0KEB1,1:PRIN 
T"{4  SPACES}"M15;Z" 
{LEFT)  " 

CQ  633  POKEY, 8;PRINT:P0KEC,7:P 
OKEBl.l: PRINT" 
{2  SPACES }"SS 

FC  640  POKEY, 8!PRINT:P0KEX, 20; 
POKEB2,0:POKEC, 3:PRINTM 
3S:PRINT 

XA  650  IFP=0THENPOKEY,ll!PRINT 
:P0KEX,24:PRINT"(H0NE) 

AQ  660  IFZG>OTHENFORO=1TOZG!PO 
KEX,26:PRINTU:NEXT 

QB  670  RETURN 

GP  680  Z  (I)=INT (5*RND(1) )+l;FL 
(I)=INT(5*RNDtl) )+0sOC( 
I)=INT(3*RND(1) )+l 

ER  690  T=INT  [A*RND(1) )+l: II (I) 
=  INT  (25*RND(1) ) +l! 12(1) 
=INT (25*RND(1) ) +1 
SL{I) =INT (255*RND(1) )+l 
J=INT  (7*RND(1) )+l:0NJGO 
TO 72 0,7 3 0,74 0,7 50, 76 0,7 
70,780 

Wl(I)=17:GOTO790 
W1{I)=33!GOTO790 
Wl  (I)=6S!GOTO790 
W1{I)=129:GOTO790 
W1{I)=21:GOTO790 
Wl  (I) =23:GOTO790 
W1{I)=85 

J  =  ItJT  [7*RND(1)  )  +1:0NJG0 
TO800, 8 10, 8 20, 8 3 0,8 4 0,8 
50,860 

W2  {n=17:GOTO870 
W2  (I) =33:GOTO870 
W2  (1)=65:GOTO870 
W2(I)=129:GOTOe70 
W2(I)=21:GOTO870 
W2(I)=23:GOTO870 
W2(I)=85 

AT  =  I NT  (8*RND(1) )  +  l:DE=I 
NT(15*RND(1) )+l 

ER  880  SU=INT  (15*RND(1) )+l!RE  = 
INT(15*RND(1) )+l 

MM  890  AD(1) =AT*16+DE:SR(r)=S0 
*16+RE 

BS  900  J=INT (4*RND (1) )+l:ONJGO 
TO910,920,930,940 
PO{I) =241:GOTO950 
PO(I)=242:GOTO950 
PD(I) =243:GOTO950 
PO(I)=240 

XT  (I)  =  INT(40*RND(1) ) +10 
J=INT(4*RND(1))+1: ON JGO 
TO970, 980, 990, 1000 
VS(I)=17:GOTO1010 
VS(I)=33:GOTO1010 
VS(I)=65:GOTO1010 
VS  (I)=129 

VI  (I)-INT{200*RND{1)  )  + 
55 

CS  1020  DB(I)=INT [8*RND(1) )+l: 
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MH 

700 

QB 

710 

KK 

720 

RM 

730 

RS 

740 

AG 

750 

BK 

760 

DX 

770 

GH 

780 

AQ 

790 

JR 

800 

QS 

810 

RC 

820 

GM 

833 

AR 

840 

DD 

850 

JM 

860 

QF 

870 

HD 

910 

XC 

920 

HA 

930 

AG 

940 

QJ 

953 

QS 

960 

FB 

970 

BC 

930 

BG 

990 

DS 

100 

PM 

131 

DC(l)  =  INT(8*RNDa)  )+l: 

DD(I) =INT(8*RND{1) )+l 
SC  1030  J=IHT (3*RND tl) )-H:ONJG 

OTO1040, 1059, 1060 
GB  1040  VO  (I) =31:RETURN 
SF  1050  VO[I) =4S!RETURN 
AX  1060  VO (I) =79:RETURN 
EP  1070  GOSUB1310:IFP»>9THEN11 

20 

jb  1080  p0kec,l!print"to  ( rvs ) 
k{off)eyboard  or  {HVS} 

D(OFF}ISK? 
CX  1090  GETft9:IFAS<>"K"THEf!IFft 

S<>"D"THENIFA$<>R$THEN 

1090 
XS  1100  IFAS=RSTHEN1190 
KR  1110  IFAS="K"THEN1320 
KE  1120  PRINTCHR$(147) 
CJ  1130  INPUT"(BLK}SAVE  FILENA 

ME  (S  -  DIR)  "fS5:IFSS 

="9"THEN    GOSUB    1300:GO 

TO1130 
EP    1140    IFSS  =  ""THEM11.90 
AX    1153    0PEN1,8,  l,SS:PRINT#l,T 

:PRItiTtH,OC(0)  :PRINT#1 

,11  (0)  : PRIHTI1,I2 (0)  :T 

( I )  =T 
EG    1160    PRINT|1,Z{0)  :PRINTn,F 

L{0)  :PRINTn,Wl  (0)  :PRI 

NTII,W2  (0)  :PRINT#1,AD( 

0) 
XG    117B    PRINT#1,SR(0)  :PRItJTtl, 

PO(0)  : PRINT  11, XT  [0)  : PR 

INTIl,Vr  (0)  :PRIflTll,VS 

(0) 
RX    1180    PRINTI1,DB(0) :PRIHT#1, 

DC(0)  :PRINTI(1,DD{0)  :  PR 

INTII,VO(0) :PRINT»1,SL 

(0) 
HB  1190  GOSUB570!CLOSEl:RETtJRN 
FJ  1200  PRIHTCHRS(147) 
RF  1210  INPUT" !BLK)L0AD  FILENA 

ME  (S  -  DIR)  ";SS: IF  S 

5^.151.  ^i^gfj  GOSUB  1300: 

GOTO1210 
AB  1Z20  IFSS=""THENGOSUBS70:GO 

TO1290 
QP  1230  OPEm,8,0,S5:INPUT#l,T 

:INPUT#1,OC(0) !INPUT#1 

,  II  (0)  :INPUT#I,I2(0) 
QP  1240  INPUTIljZ (0) :INPUT#1,F 

L(0)  :INPL[T#1,W1(0)  :INP 

UT)tl,W2(0)  :INPUT*1,AD( 

0) 
EC  1250  INPUTil,SR[0) IINPUTll, 

PO (0)  : INPUT #1, XT  (0) : IN 

PUT#1,VI (0) :INPUT#1,VS 

(0) 
JQ    1260    INPUT#1,DB(0)  :INPL[T#1, 

DC{0) :INPUT#1,DD(0) :IN 

PUT#1,VO{0) :INPUT#1,SL 

(0) 
Dfi  1270  GOSUB570 
SX  12B0  P0KEY,B:PRIHT:POKEC,7 
JP  1290  CLOSEl: I=0:RETURN 
DG  1300  PRINT" fCLR} {WHT)":GOSU 

B1370 
KD  1310  S5='"":POKE19e,0!PRINT! 

RETURN 
JC  1320  P=P+1:!-P:T(I)=T 
CB  133  0  OC(I)=OC{0)  :  II  (I)=I1  (0 

)  :I2  {1)=I2  [0S :K(I)=Z(0 

)  :FL(I) =FL{0)  :W1  [Il'Wl 

(0> 
HR  1340  W2(I)-W2(0) ;AD(I)=ADt0 

J  :SR(I)=SR(0) :PO{I)=PO 

(0)  !XT(I)=XT  (0)  :VI  (I)  = 

VI  (0) 
CJ  1350  VS{I)=VS{0) ;DB(I)=DB(0 

)  :DC(n=DC(0)  :DD(I)=DD 

(0) :VO(I)=VO(0) ;SL(I) = 

SL{0) 


HH  1360 

ZG 

=ZG+1: 

GOSUB570: 

GOTO  5 

0981 

FF 

20 

CA 

10 

A9 

00 

80 

lA 

78 

60 

09B9 

09 

8D 

AE 

11 

80 

AF 

11 

80 

45 

KE  1370 

OPEN15,8 

,15 

:0PEN1 

,8, 

0, 

0991 

B0 

11 

BD 

Bl 

11 

60 

A0 

IE 

76 

"$0" 

0999 

99 

20 

OB 

88 

C0 

FF 

D0 

F8 

2S 

HJ  1380 

GETil 

,A5 

,A5 

09A1 

A0 

IE 

99 

48 

OB 

88 

C0 

FF 

C5 

MP  1390 

GETIl 

,A5 

,AS 

09A9 

D0 

F8 

AB 

IE 

99 

70 

DB 

88 

27 

BD  1400 

S  = 

ST: 

IFSO0THENCLOSE1; 

09B1 

C0 

FF 

00 

F8 

A0 

IE 

99 

98 

17 

GOTO 14 60 

09B9 

DB 

88 

C0 

FF 

00 

FB 

A0 

IE 

BD 

DJ  1410 

GETfl 

, LOS, HIS 

09C1 

99 

C0 

DB 

88 

C0 

FF 

00 

F8 

75 

KG  1420 

LO 

'ASC(L09+ 

CKR$(0) ) : 

HI 

0  9C9 

60 

BD 

17 

0A 

AO 

11 

00 

10 

56 

=ASC(HI5+CHRS{0) ) 

:LN 

•L 

0901 

FB 

AC 

17 

0A 

A2 

00 

B9 

69 

82 

0+HI* 

256 

:LN5»MID5(STRS 

09D9 

16 

9D 

20 

07 

C8 

E8 

E0 

IF 

90 

(LN)  , 

2) 

09C1 

00 

F4 

AC 

17 

0A 

A2 

00 

B9 

35 

KH  14  3  0 

PRINTLN$ 

+  " 

11  . 

09E9 

68 

17 

90 

48 

07 

C8 

E3 

E0 

3C 

EQ  1440 

GET*  I 

.BS 

:ifbS= 

""THENPR 

09F1 

IF 

D0 

F4 

AC 

17 

0A 

A2 

00 

57 

INTCHR5(13) 

;  ! GOTO 13 90 

09F9 

B9 

67 

18 

9D 

70 

07 

C8 

ES 

B9 

KK  1450 

PRINTBS; 

:GOTO1440 

0A01 

E0 

IF 

00 

F4 

AC 

17 

0A 

A2 

2F 

HH  1460 

INPUTttlB 

.EN 

■EMS.ET.ES: 

0Afl9 

00 

89 

66 

19 

90 

98 

07 

CB 

10 

IFEN<>aTHENPRINTEN:EMS 

0A11 

E8 

E0 

IF 

D0 

F4 

60 

DA 

8D 

2F 

;ET;ES 
CL0SE15: 

0A19 

30 

0A 

CE 

30 

0A 

AD 

30 

0A 

16 

CD  1470 

RETURN 

0A21 

C9 

FF 

F0 

0A 

A0 

FF 

88 

C0 

AF 

0A29 

FF 

D0 

FB 

4C 

IB 

0A 

60 

FF 

77 

0A31 

AD 

00 

DC 

C9 

7E 

F0 

2F 

C9 

34 

BEFORE  TYPING  . 

0A39 

76 

F0 

31 

C9 

77 

F0 

36 

C9 

3D 

Before  typing  in 

programs, 

please 

0A41 
0A49 

75 
79 

F0 

F0 

38 
3F 

C9 
C9 

70 
7B 

F0 
F0 

3D 
44 

C9 
C9 

E3 

CC 

refer  to 

How  to  Type 

n 

0A51 

7A 

F0 

46 

C9 

7F 

D0 

01 

60 

E5 

COMPUTEr 

s  Gazette  Programs," 

0A59 

8D 

52 

0B 

20 

IE 

0D 

AD 

52 

F6 

elsewhere  in  this  issue. 

0A61 

0B 

69 

0F 

4C 

34 

0A 

20 

A3 

A9 

0A69 
0A71 

0A 
C8 

4C 
0A 

58 
4C 

0A 
SB 

20 
0A 

A3 
20 

0A 
C8 

20 

0A 

05 

E7 

Mine  Sweeper 

0A79 
0A81 

4C 
0A 

5B 
4C 

0A 
SB 

20 
0A 

CI 
20 

0A 

CI 

20 
0A 

C8 

4C 

4C 

CI 

0A89 

58 

0A 

20 

CI 

0A 

20 

B0 

0A 

AS 

See  instructions  in  article 

oil 

page 

0A91 

4C 

58 

0A 

20 

B0 

0A 

4C 

SB 

C3 

n  befori 

typing  in 

0A99 
0AA1 

0A 
58 

20 
0A 

A3 
AD 

0A 
01 

20 
00 

B0 
E9 

0A 
02 

4C 
C9 

F3 
26 

0801:11 

08 

0A 

00 

9E 

20 

29 

32 

04 

0AA9 

3A 

90 

03 

8D 

01 

00 

60 

AO 

Fl 

0S09:30 

36 

38 

29 

20 

42 

43 

00 

EB 

0AB1 

15 

09 

C9 

01 

F0 

03 

20 

DB 

BB 

0811:00 

00 

FF 

20 

IF 

16 

20 

IE 

02 

0AB9 

0A 

A9 

01 

8D 

15 

09 

60 

60 

24 

0819:09 

EE 

ID 

09 

AD 

ID 

09 

C9 

SB 

0AC1 

EE 

01 

00 

EE 

01 

D0 

60 

AD 

50 

0821:05 

00 

02 

A9 

00 

8D 

ID 

09 

3C 

0AC9 

15 

09 

C9 

01 

00 

03 

20 

FB 

C2 

0829:30 

lA 

09 

20 

3F 

12 

A9 

00 

3F 

0AO1 

0A 

A9 

02 

80 

15 

09 

60 

A9 

AS 

0831:80 

15 

D0 

A9 

01 

8D 

15 

09 

73 

0AD9 

00 

80 

EE 

0A 

20 

EF 

0A 

EE 

93 

B839:A2 

08 

A0 

09 

18 

20 

F0 

FF 

03 

0AE1 

EE 

0A 

AD 

EE 

0A 

C9 

93 

D0 

E2 

0841:20 

72 

13 

20 

8C 

0B 

AD 

6  5 

B3 

0AE9 

F3 

EE 

FB 

07 

60 

00 

EE 

F8 

ID 

0849:98 

C9 

01 

F0 

0E 

AS 

C5 

C9 

SB 

0AF1 

07 

20 

93 

0B 

A9 

23 

20 

18 

E6 

0851:02 

00 

12 

A9 

01 

8D 

66 

08 

84 

0AF9 

0A 

60 

A9 

04 

BD 

11 

BB 

20 

87 

0859:4C 

66 

08 

AS 

C5 

C9 

39 

00 

ID 

0B01 

12 

0B 

CE 

11 

0B 

AD 

11 

0B 

0A 

0861:04 

4C 

07 

16 

00 

A9 

01 

20 

91 

0B09 

C9 

01 

D0 

F3 

CE 

FB 

07 

60 

66 

0869:18 

0A 

AD 

00 

DC 

C9 

74 

B0 

65 

0B11 

00 

CE 

FB 

07 

20 

9D 

BB 

A9 

Al 

0871:02 

20 

CD 

12 

20 

7B 

08 

4C 

19 

0B19 

23 

20 

18 

0A 

60 

AD 

51 

0B 

D3 

0879:14 

08 

20 

IE 

09 

A9 

00 

80 

F7 

0B21 

C9 

00 

F0 

01 

60 

20 

FE 

13 

DE 

0881:11 

0E 

20 

05 

13 

20 

3F 

12 

A8 

0B29 

78 

AO 

15 

09 

8D 

51 

BB 

C9 

AB 

0889:20 

ac 

0B 

20 

4F 

13 

20 

E9 

21 

0B31 

01 

F0 

0B 

A9 

A0 

BD 

82 

00 

AF 

0891:11 

20 

5B 

0D 

20 

54 

11 

20 

03 

0B39 

4C 

41 

0B 

a9 

6E 

BD 

B2 

D0 

40 

0899:B2 

11 

A5 

Al 

20 

85 

12 

20 

71 

0041 

AD 

01 

00 

80 

03 

00 

AD 

15 

20 

08A1:BC 

0B 

20 

10 

0F 

20 

31 

0A 

25 

0n49 

D0 

09 

02 

8D 

15 

D0 

SB 

60 

20 

08A9:20 

AT 

0B 

AD 

IC 

09 

C9 

03 

8B 

0B51 

00 

00 

AD 

51 

0B 

C9 

00 

F0 

A2 

08B1:D0 

10 

EE 

lA 

09 

20 

AB 

0D 

DA 

HB59 

24 

AD 

11 

00 

10 

FB 

AD 

51 

39 

08B9:AD 

lA 

09 

C9 

05 

00 

C6 

4C 

2A 

0B61 

0B 

C9 

01 

F0 

0C 

AD 

02 

00 

BA 

08C1:AC 

14 

A9 

01 

20 

18 

0A 

AD 

95 

0B69 

IB 

69 

10 

B0 

10 

SO 

02 

D0 

7E 

08C9:17 

09 

C9 

01 

00 

C9 

AS 

Al 

8B 

BB71 

60 

AO 

02 

00 

38 

E9 

10 

90 

8A 

08D1:BO 

IB 

09 

A9 

00 

8D 

17 

09 

98 

0B79 

04 

8D 

02 

00 

60 

AD 

IS 

D0 

F6 

08D9:A2 

0A 

A0 

0A 

18 

20 

F0 

FF 

95 

0B81 

29 

FD 

9D 

15 

D0 

A9 

B0 

80 

69 

08E1:CE 

19 

09 

AD 

19 

09 

C9 

00 

IC 

0089 

51 

Sin 

60 

AD 

15 

09 

C9 

01 

5) 

08E9:F0 

0C 

20 

54 

11 

20 

4F 

13 

79 

BB'U 

FH 

0A 

EE 

16 

09 

AD 

16 

09 

16 

08F1:2H 

AB 

0D 

4C 

BF 

08 

20 

FC 

3D 

0R99 

20 

CA 

09 

$0 

CE 

16 

09 

AO 

28 

08F9:12 

A9 

FF 

20 

18 

0A 

A9 

FF 

BB 

0nAl 

16 

09 

20 

CA 

09 

60 

AD 

IE 

F8 

0901:20 

18 

0A 

A9 

FF 

20 

18 

0A 

BF 

0BA9 

00 

BO 

9B 

0C 

AO 

IF 

00 

80 

OB 

0909:A9 

FF 

20 

18 

0A 

20 

AB 

00 

AA 

0nBl 

9C 

0C 

AO 

IS 

09 

C9 

01 

F0 

B2 

0911:20 

CD 

12 

60 

01 

OA 

00 

00 

62 

0nB9 

IB 

AO 

9C 

BC 

29 

01 

C9 

01 

7D 

0919:FF 

00 

00 

00 

00 

A9 

10 

80 

99 

0BC1 

00 

03 

4C 

65 

0C 

AD 

9B 

0C 

3B 

0921:18 

D0 

A9 

00 

8D 

21 

D0 

8D 

C8 

0BC9 

29 

01 

C9 

01 

D0 

03 

4C 

65 

8E 

0929:20 

D0 

A9 

D8 

80 

16 

00 

A9 

52 

0BD1 

0C 

AD 

9B 

0C 

29 

04 

C9 

04 

7E 

0931:FF 

80 

IC 

D0 

A9 

0B 

8D 

2  5 

F0 

01109 

D0 

17 

AO 

A3 

0C 

C9 

FF 

F0 

86 

0939:D0 

A9 

01 

80 

26 

00 

A9 

03 

D2 

0BE1 

06 

20 

27 

14 

30 

CB 

11 

A9 

25 

a941:8D 

F9 

07 

A9 

04 

8D 

9D 

0C 

38 

0BE9 

FF 

BD 

A3 

0C 

A9 

09 

8D 

29 

4E 

0949:8D 

9E 

0C 

80 

9F 

0C 

A9 

DB 

80 

0BF1 

00 

AO 

11 

0E 

C9 

01 

F0 

20 

33 

0951:80 

A0 

0C 

A9 

DC 

8D 

Al 

0C 

DA 

0BF9 

AD 

9D 

0C 

29 

08 

C9 

08 

00 

2A 

0959:A9 

01 

80 

28 

00 

A9 

00 

80 

6F 

0C01 

17 

AD 

A4 

0C 

C9 

FF 

F0 

06 

9B 

0961:1E 

D0 

SO 

IF 

00 

20 

BA 

13 

E9 

0C09 

20 

27 

14 

20 

CB 

11 

A9 

FF 

75 

0969:A9 

30 

BD 

12 

04 

A9 

02 

8D 

22 

0C11 

80 

A4 

0C 

A9 

09 

80 

2A 

00 

OB 

097I:0E 

D4 

A9 

00 

8D 

0F 

04 

A9 

F0 

0C19 

AD 

9B 

0C 

29 

10 

C9 

10 

00 

9B 

0979:09 

80 

19 

09 

A9 

93 

20 

D2 

D5 

0C21 

17 

AD 

AS 

0C 

C9 

FF 

F0 

06 

DB 
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0C29 : 

20 

27 

14 

20 

CB 

11 
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1C61'03  03  05  05  05  05  05  05  18  1F09:18  30  60  30  18  BE  00  00  67  21B1:00  00  0A  00  00  2fi  00  00  DD 

1069-05  03  03  05  05  05  05  05  E0  1F11:00  7E  00  7E  00  00  00  70  47  21B9:AA  00  3F  BC  00  C2  AA  03  68 

1C71'05  05  03  03  01  01  01  01  0D  1F19:18  0C  06  0C  18  70  00  7C  E6  21C1:0A  FF  0A  A9  55  55  52  A8  32 

1C79*01  01  05  03  03  05  05  05  7E  1F21:C6  06  IC  18  00  18  00  AA  S4  21C9:00  02  A8  00  00  FC  00  00  95 

1C81-05  05  05  05  03  03  05  05  Al  1F29:AA  AA  AA  AA  AA  AA  AA  FF  BC  21Dl:Aa  00  05  55  00  00  00  00  5E 

1CB9-05  05  05  05  05  03  03  05  B5  1F31:FF  FF  EE  BB  AA  AB  BA  A9  2C  2109:00  00  00  00  00  00  00  00  IC 

1C91-0S  05  05  05  05  05  03  03  C3  1F39:9A  AA  66  99  55  55  55  SI  02  21E1:00  00  00  00  00  00  00  00  24 

1C99:05  05  05  05  05  05  05  03  CF  1F41S3C  34  34  34  34  34  34  34  83  21E9!00  00  00  00  00  00  00  00  2C 

lCAl-03  05  05  05  05  05  05  05  D8  1F49;34  34  E9  E9  A6  BA  E9  00  7E  21F1S00  00  08  00  00  00  00  08  34 

1CA9-03  03  05  05  05  05  05  05  60  lF51:a0  00  00  03  0F  3F  FE  00  33  21F9:00  00  00  00  00  00  00  00  3C 

lfBl'05  03  03  05  05  05  05  05  29  1F59:00  00  00  48  50  54  95  FF  9A  2201:00  00  00  00  00  8A  AA  A2  67 

trR9-fl5  05  03  03  05  05  05  05  91  1F61:AA  AA  55  20  20  08  08  C0  3E  2209:00  00  00  00  00  00  00  00  4D 

1CC1*0S  05  05  03  03  05  OS  05  C9  1F69:F0  FF  EE  BB  AA  AB  BA  03  36  2211:00  00  00  00  00  00  00  00  55 

lcr9-05  05  05  05  03  03  05  05  E9  1F71;0F  FF  EE  BB  AA  AB  BA  02  4C  2219:00  00  00  00  00  00  00  00  5D 

irnl^as  05  05  05  05  03  03  01  F9  1F79:0C  30  33  33  C0  CC  CO  80  9E  2221:00  00  00  00  00  00  FF  00  65 

lcn9-01  01  01  01  01  01  03  03  18  1F81:10  04  04  04  01  01  01  FA  92  2229:00  00  00  00  00  00  00  00  6D 

ICFl^OS  05  05  05  05  05  05  03  18  1F89:3E  OE  0E  0E  BE  0E  0E  A5  77  2231:00  OO  00  00  00  00  03  C3  3F 

lCE9-a3  05  01  01  01  01  01  05  28  1F91:94  90  90  90  90  90  90  FF  41  2239:40  03  FF  40  0F  FD  50  OF  82 

lCFl-03  03  05  01  06  06  06  01  72  1F99:FD  E9  E9  E9  E9  D5  55  03  81  2241:E9  50  OB  96  60  02  60  40  7B 

1CF9-05  03  03  05  01  01  01  01  35  1FA1:0F  0F  2E  3B  2A  AB  BA  00  lA  2249:02  6B  40  0B  BE  60  OF  E9  Al 

1001*01  05  03  03  05  05  35  05  DB  1FA9;00  00  00  00  00  11  44  00  B4  2251:50  0F  D5  50  03  55  40  03  32 

1009-05  OS  05  03  03  05  05  05  13  1FB1:55  A9  A9  A9  A9  A9  A9  FF  IC  2259:41  40  00  00  00  00  00  00  4E 

lDll-05  01  01  05  03  03  05  05  Bl  1FB9:FF  EA  EA  EA  EA  EA  EA  FF  97  2261:00  00  00  00  00  00  FF  00  A5 

1D19-05  05  05  05  0S  03  03  03  45  1FC1:FF  AA  AA  AA  AA  AA  AA  FF  FF  2269:00  00  00  00  00  00  00  00  AD 

1D21-03  03  03  03  03  03  03  38  90  1FC9:FD  A9  A9  A9  A9  A9  A9  EA  73  2271:00  00  00  00  00  00  00  00  B5 

1D29-67  C6  C0  C6  67  38  00  IB  84  1FD1:EA  EA  EA  EA  EA  EA  EA  A9  CE  2279:00  00  00  00  03  CO  00  0E  E6 

lOai'lB  33  33  6F  63  63  00  6C  38  1FD9:A9  A9  A9  A9  A9  A9  A9  EA  59  2281:BC  00  0E  A3  00  03  2B  00  82 

1039-63  63  6C  63  63  6C  00  IE  AC  1FE1;EA  EA  EA  EA  EA  05  55  AA  60  2289:03  8C  00  00  FO  00  00  00  F9 

1041-33  60  60  60  33  IE  00  6C  BD  1FE9:AA  AA  AA  AA  AA  55  55  A9  27  2291:00  00  00  00  00  00  00  00  DS 

1049-66  63  63  63  66  6C  00  6F  86  1FF1:A9  A9  A9  A9  A9  55  55  OE  9A  2299:00  00  00  00  00  00  00  00  DO 

1051-60  60  6C  60  60  6F  00  6F  97  1FF9:0E  3A  39  39  E4  E4  E4  00  0D  22Al:00  00  00  00  00  00  00  00  E5 

1059-60  60  6C  60  60  60  00  IB  12  2001:00  00  00  01  04  10  40  01  33  22A9:00  00  00  00  00  00  00  00  EO 

1061-30  60  67  60  33  IE  00  63  34  2009:04  10  40  00  00  00  00  20  77  22B1:00  00  00  00  00  C0  0F  03  lA 

1D69-63  63  6F  63  63  63  00  3F  3A  2011:20  20  AA  20  20  20  20  20  A2  22B9:30  0E  C3  B0  0E  FE  B0  0E  F8 

1O71-0C  BC  0C  0C  0C  3F  00  3F  93  2019:20  20  AA  20  20  20  AA  00  9F  22C1:AA  C0  03  2A  00  03  AB  00  Fl 

1079*06  06  06  06  36  IC  OO  63  DE  2021:FF  BB  EE  99  66  65  00  F9  4A  22C9!03  8A  C0  03  BC  B0  0E  C3  03 

1081-66  6C  68  6C  66  63  00  60  FE  2029:E5  F9  E5  F9  E5  F9  E5  00  lA  22D1:AC  OE  C0  F0  OC  C0  C0  03  FE 

1089-60  60  60  60  60  6F  00  63  42  2031:0F  3F  3E  F9  E6  F9  E5  80  IB  2209:00  00  00  00  00  08  80  00  IE 

1091-6F  6B  63  63  63  63  00  63  OD  2039:F0  B4  E4  95  A5  99  E5  00  74  22E1:00  00  00  00  00  OO  FF  00  26 

1D99-6B  6F  67  63  63  63  00  IC  40  2041:AF  6B  9E  49  16  05  00  AA  0C  22E9:00  00  00  00  3C  3C  00  EB  BC 

1DA1*36  63  63  63  36  IC  00  6E  03  2049:00  00  00  00  00  00  00  3F  C8  22F1:EB  03  AB  EB  03  AB  EB  00  BF 

10A9-63  63  63  6E  60  60  00  IC  62  2051:7F  EB  C0  C0  C0  C3  C3  FF  4A  22F9:EC  E2  C0  EC  3A  FF  AC  BE  80 

lDBl!36  63  63  67  36  IF  BB  6E  5F  2059:FF  00  0B  00  00  FF  FF  FC  96  2301: AA  BB  0E  2A  C0  BE  AB  B0  C2 

10B9-63  63  6E  63  63  63  00  3E  69  2061:FE  07  03  03  03  C3  C3  C3  E5  2309:0E  8A  C0  OE  AS  B0  3A  BE  20 

10C1*63  60  3E  B3  63  3E  00  7F  51  Z069:C3  C3  C3  C3  C3  C3  C3  C3  a9  2311:AC  3A  C3  AC  EB  C3  ac  E2  01 

1OC9-0C  0C  0C  0C  0C  0C  00  63  43  2071:C3  C0  C0  C0  E0  7F  3F  C3  2F  2319:C3  AB  EB  00  EB  EB  00  3B  F3 

1001:63  63  63  63  63  2E  00  63  70  2079!C3  03  03  03  07  FE  FC  FC  18  2321: 3C  00  0C  00  00  00  71  80  E9 

1009:63  63  36  36  36  IC  00  63  4E  2881:06  06  FC  C6  C6  C6  FC  IC  89  2329:00  00  00  00  3C  3C  00  EB  2E 

1DE1:63  63  63  6B  6F  67  00  63  46  2089:30  30  60  60  60  70  3F  CO  04  2331:EB  03  AB  BB  03  AB  EB  00  01 

10E9:63  36  IC  36  63  63  00  63  56  2091;E0  F0  7F  7E  3F  7F  FC  00  48  2339:EC  E3  00  FC  3C  3C  00  03  94 

1DF1:63  63  3F  03  03  3E  00  7F  SF  2099:00  00  EO  10  FF  CO  00  FF  F9  2341:EB  00  0E  2A  CO  0E  AS  CO  32 

1DF9;03  06  0C  18  30  7F  00  3C  F5  20A1:FF  FF  FF  FF  FF  FF  FF  00  El  2349:0E  8A  CO  03  AB  00  30  FC  3C 

1E01:30  30  30  30  30  3C  00  OC  E8  20A9:00  00  00  00  00  EO  00  00  60  2351:FC  3C  00  EC  EB  C3  8C  E2  5E 

1E09:12  30  7C  30  62  FC  OO  3C  30  20B1:AB  BB  80  A8  00  00  AA  00  22  2359:C3  AB  EB  00  EB  EB  00  3B  34 

1E11:0G  BC  0C  0C  0C  3C  00  00  E9  20B9:OO  3E  FC  08  AA  B3  00  FF  BC  2361: 3C  80  0C  80  00  00  71  00  2A 

1E19;18  3C  7E  18  18  18  18  00  13  28C1:AB  C0  55  6A  AO  2A  85  55  El  2369:00  00  00  00  00  00  00  3C  EB 

1EZ1:10  30  7F  7F  30  10  00  0B  IB  20C9:2A  80  00  3F  00  00  2A  08  87  2371: 3C  00  EC  EC  00  EC  30  00  56 

1E29:00  00  00  00  00  00  OO  18  7D  20D1:O0  55  58  08  80  80  00  00  71  2379:30  00  00  00  00  00  00  00  D7 

1E31:18  18  18  00  00  18  00  66  49  2009:00  00  00  00  00  00  00  00  lA  2381:F0  00  03  2F  00  03  AB  00  F6 

1E39:66  46  00  00  00  00  00  66  A0  20E1:00  00  00  00  00  00  79  55  6A  2389:03  8B  00  00  FC  00  00  00  IC 

1E41-66  FF  66  FF  66  66  00  18  62  20E9:50  00  2A  00  00  2A  00  00  40  2391:00  00  00  30  3C  00  CC  33  89 

1E49:3E  60  3C  06  7C  18  80  62  4B  20F1:2A  00  00  3F  00  00  2A  80  10  2399:00  EC  EC  00  3C  3C  00  OC  97 

1B51:66  0C  IS  38  66  46  00  3C  52  20F9:flB  2A  80  00  IS  SO  00  59  18  23A1:00  00  00  00  00  00  00  00  B7 

1ES9:66  3C  3B  67  66  3F  00  06  BB  2101:BF  80  66  C0  A0  F9  C0  E5  70  23A9S00  00  00  00  00  00  00  OC  FB 

1E61:0C  18  00  00  00  00  00  0C  B5  2109:66  CO  AO  59  BF  80  15  50  D2  23Bl!30  00  20  00  00  CC  30  00  A7 

1E69:18  38  30  30  18  0C  00  30  E7  2111:00  2A  80  00  2A  80  00  3F  BO  23B9:00  00  00  00  00  00  00  00  FF 

1E71:18  0C  0C  0C  18  30  00  00  B0  2119:00  00  2A  00  00  2A  00  00  49  23C1:0O  00  03  23  00  00  00  00  9A 

1E79:66  3C  FF  3C  66  88  00  00  EE  212l!2A  00  00  55  50  00  FF  00  50  23C9:03  08  00  00  30  00  00  00  15 

1E81:18  18  7E  18  18  80  00  00  El  2129:04  00  80  0C  00  00  30  00  3E  2301:00  00  00  OO  OC  00  CC  03  15 

lEe9:00  00  00  00  18  18  30  00  47  2131:00  30  00  0B  30  00  00  CO  CI  2309:00  00  C0  00  38  BC  00  BC  FS 

1E91-00  00  7E  00  00  00  00  00  90  2139:00  00  EC  00  00  EO  00  02  9E  23E1:00  00  00  00  00  80  FF  00  28 

1E99:B0  00  08  BB  18  18  00  00  F6  2141:B0  08  08  20  80  3C  24  00  18  23E9:00  00  00  00  00  BB  00  00  30 

lEAl'03  06  OC  18  30  60  00  7C  63  2149:08  20  00  02  B0  00  00  EO  IE  23F1:0O  00  00  00  00  88  08  80  38 

IEA9:C6  CE  06  E6  C6  7C  00  18  86  2151:00  00  BC  00  88  CO  00  00  34  23F9!C0  00  03  CB  00  3E  FF  03  09 

IEB1:38  7B  13  18  18  FE  00  7C  E5  2159:30  00  00  30  00  00  30  00  17  2401:FB  BB  3E  BB  EA  FB  AA  AA  34 

1EB9:C6  06  OC  30  C0  FE  00  FE  60  2161:00  0C  00  00  04  00  FF  00  C6  2409:D9  AA  AE  16  66  BF  01  59  AD 
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8A 

EE 

7F69:A9 

20 

91 

35 

A5 

A7 

91 

9E 

4F 

{SPflCE}THEN    PRINT: PRINT 

7CC0 

4  8 

98 

48 

A9 

7F 

3D 

0D 

DD 

Dl 

7F68:E6 

27 

CB 

C4 

F7 

D0 

D0 

E8 

97 

"NOT    A    1571    DRIVE":CLO 

7CC8 

AC 

0D 

DD 

30 

IC 

20 

02 

FD 

70 

7F70:E4 

F3 

D0 

C9 

60 

43 

BD 

F0 

67 

SE    1;EHD 

7CD0 

F0 

14 

23 

BC 

F6 

20 

El 

FF 

13 

7F78:EC 

85 

35 

85 

9E 

BD 

38 

7F 

D0 

AQ   120 

PRINTI1,"M-R"CHRS (0)CHR 

7CDa 

00 

0F 

20 

A3 

FD 

20 

IB 

E5 

C2 

7F80:18 

69 

04 

85 

36 

69 

04 

85 

45 

5{12B)CHR$[2) :GET#1,A5, 

7CE0 

20 

8E 

7C 

6C 

02 

A0 

4C 

5B 

6A 

7FB9:9F 

68 

60 

00 

00 

00 

00 

00 

7D 

BStCLOSE    1 

7CE8 

FE 

4C 

72 

FE 

A6 

7A 

A0 

04 

17 

7F90:00 

09 

01 

01 

01 

01 

01 

01 

CE 

BS    130 

A-A5C  (A$+CHR$ (0) )  :B  =  A5C 

7CFa 

84 

0F 

BD 

00 

02 

10 

07 

C9 

CF 

7F98:02 

02 

02 

02 

92 

02 

92 

93 

98 

(B$+CHRS{(})  )  :R$-"UiJKNOW 

7CF9 

FF 

i-3 

3E 

EB 

D0 

F4 

C9 

20 

92 

7FA0:03 

03 

03 

03 

EE 

27 

D0 

EE 

17 

N" 

7D00 

F0 

37 

85 

08 

C9 

22 

F0 

56 

81 

7FA8:28 

D0 

A5 

A9 

F0 

02 

C6 

A9 

06 

KK    140 

IF    A=157    THEN    IF    B=30 

T 

7D08 

24 

0F 

70 

2D 

C9 

3F 

D0 

04 

AA 

7FB0:AD 

5C 

82 

2D 

50 

82 

10 

18 

ED 

HEN    R5="-01" 

7D1H 

A9 

99 

D0 

25 

C9 

30 

90 

34 

E6 

7FB8:AD 

00 

DC 

29 

13 

F0 

04 

35 

3E 

KR    150 

IF    A=14e    THEN    IF    B=37 

T 

7Dia 

C9 

3C 

90 

ID 

84 

71 

A0 

00 

16 

7FC0:A8 

D0 

10 

C5 

A8 

85 

A8 

F9 

44 

HEN    R$="-03" 

7020 

84 

0B 

BB 

36 

7A 

CA 

C8 

E8 

13 

7FCa;0A 

A9 

80 

85 

2A 

4E 

5D 

32 

67 

GK    160 

IF    A=242    THEN    IF    D=104 

7D28 

BD 

00 

02 

38 

F9 

9E 

A0 

F3 

42 

7FD0:4C 

31 

EA 

A5 

A9 

D0 

F9 

AO 

2C 

(SPACE) THEN    RS="-0S" 

7D30: 

F5 

C9 

80 

D0 

30 

05 

0B 

A4 

36 

7FD8:03 

DC 

29 

0F 

49 

0F 

F0 

F0 

7E 

FE    170 

PRIMT    "1571    DOS    ROM    REV 

7D38 

71 

EB 

ca 

99 

FB 

01 

B9 

FB 

2C 

7FE0:AD 

5B 

B2 

85 

A9 

AD 

00 

OC 

17 

ISION    IS    ";RS 

7D40: 

01 

Fa 

38 

38 

E9 

3A 

F0 

04 

A0 

7FE8:4A 

B9 

06 

A6 

06 

F0 

02 

C6 

23 

7D48: 

C9 

49 

D0 

32 

85 

0F 

3a 

E9 

77 

7FF3:36 

4A 

B9 

08 

A6 

96 

E0 

6F 

9A 

Program  2:  CBM  Drive  Check 

7D50; 
7D58: 

55 
F0 

00 
OF 

9F 
C5 

85 
08 

08 

Fa 

BD 
DB 

00 

CB 

02 
99 

AF 
IF 

7FF8:B0 
8000:05 

02 
F0 

E6 
0E 

06 
C6 

4A 
05 

60 
A6 

12 
04 

A6 
F0 

ED 
A9 

JH    100 

INPUT    "CHECK   WHICH    UNIT 

7D60: 

FB 

01 

E8 

D0 

F0 

A6 

7A 

E6 

CI 

8908:38 

A6 

05 

F0 

94 

C6 

05 

06 

Bl 

";U:OPEN    8,tJ,15 

7D68: 

0B 

C8 

B9 

9D 

A0 

10 

FA 

B9 

21 

8010:A9 

4A 

B0 

16 

A6 

95 

E9 

6F 

6A 

EG    110 

PRINT#8,"M-R"CHR$(0)CHR 

7D70! 

9E 

A0 

D0 

B4 

F0 

0F 

BD 

00 

87 

3018:B0 

10 

E6 

05 

A6 

94 

F9 

0A 

03 

S(192)CHRR$[2) :GET#a 

AS 

7D78: 

02 

10 

BC 

99 

FD 

91 

C6 

7B 

A6 

8020:AG 

05 

E0 

6F 

B0 

04 

E6 

05 

31 

,B5 

7D80: 

A9 

FF 

85 

7A 

60 

A9 

FF 

CA 

Fa 

8328:06 

A9 

4A 

90 

A0 

4E 

5C 

82 

62 

GD    120 

PRINTi8,"M-R"CHR${47)CH 

7DB8: 

CB 

E8 

BD 

00 

02 

38 

F9 

El 

A0 

8030:4C 

31 

EA 

23 

3C 

83 

23 

88 

AF 

RS(255)CHRS(1) :GET#8 

CS 

7D90: 

70 

F0 

F5 

C9 

89 

D0 

04 

05 

36 

8338;8B 

4C 

SB 

8A 

8A 

43 

BC 

5B 

10 

QH    130 

MK    140 

CLOSE    8 

7D98: 

0B 

00 

9C 

A6 

7A 

E6 

0B 

CB 

99 

8340:80 

BD 

54 

80 

AA 

18 

20 

F0 

6A 

A=fiSC {AS+CHR3 (0) ) :B=ASC 

7DA0: 

B9 

E0 

7D 

10 

FA 

B9 

El 

7D 

61 

8048:FF 

68 

AA 

BD 

62 

83 

BC 

69 

ac 

{BS+CHRS(0)) :C=ASC(C$+C 

7DA8: 

D0 

E0 

F0 

CA 

30 

03 

4C 

F3 

29 

8059:39 

4C 

D7 

86 

08 

38 

37 

07 

70 

HRS(0)) 

IF    A0151    THEN    200 

IF    C0169    THEN    PRINT 

541":  END 

IF    B=70    THEN    PRINT    "3 

IB    WITH    UPDATE" :ND 

7DB0: 

A6 

C9 

FF 

Fa 

F9 

24 

9F 

39 

2F 

3058:07 

97 

07 

96 

18 

0D 

3E 

0C 

FC 

PQ    150 
BJ    160 

7088: 

FS 

C9 

CC 

B0 

03 

4C 

24 

A7 

FE 

B0e0:0A 

02 

70 

72 

78 

86 

92 

A2 

CI 

"1 

7DC0: 
7DC8: 

38 
CA 

E9 
F0 

CB 
08 

AA 
C8 

84 
B9 

49 
El 

A0 
7D 

FF 
19 

01 
53 

806BSB6 
8070:46 

89 
99 

80 
43 

89 
48 

80 
52 

80 
24 

39 
3A 

89 
00 

84 
19 

SB    170 

54 

7DD0: 
7DD8: 

FA 
05 

30 
20 

F5 
47 

08 
AB 

B9 
00 

El 

F5 

7D 
4C 

30 
EF 

21 
E8 

B978;4F 
8090:45 

55 
4D 

54 
4F 

29 
52 

4F 
59 

46 

00 

29 

4F 

4D 

55 

24 
45 

7DE0: 

A6 

44 

4C 

4F 

41 

C4 

43 

4C 

AE 

8089:54 

20 

4F 

46 

20 

43 

48 

52 

FA 

GB    130 

IF    B=170    THEN    PRINT    ' 

15 

7DEB: 

4F 

41 

C4 

44 

53 

41 

56 

C5 

CA 

8090:53 

00 

47 

41 

52 

42 

41 

47 

9D 

41B    THAT    NEEDS    UPDATE 

t 

7DF0: 

43 

53 

41 

56 

C5 

45 

44 

49 

05 

8098:45 

20 

43 

4F 

4C 

4C 

45 

43 

03 

END 

7DFa: 

54 

4F 

D2 

53 

54 

41 

4D 

D9 

94 

80A0:54 

00 

41 

52 

45 

20 

59 

4F 

C5 

PX    190 

IF   B=224    THEN    PRINT    ' 

15 

7E00: 

45 

52 

41 

53 

C5 

43 

4C 

45 

AA 

80A8:55 

20 

53 

55 

52 

45 

3F 

20 

62 

41-II";END 

7E08: 

41 

02 

4D 

55 

4C 

54 

49 

C3 

63 

80B0:28 

59 

2F 

4E 

29 

00 

45 

4E 

09 

BG    200 

IF    A-56    THEN    PRINT    "157 

7E10: 

00 

20 

73 

03 

23 

lA 

7E 

4C 

36 

80B8:54 

45 

52 

20 

46 

52 

41 

40 

CC 

1    WITH    UPDATE": END 

7E18: 

AE 

A7 

C9 

CC 

93 

14 

C9 

D5 

9A 

80C0:45 

20 

23 

2a 

20 

41 

4E 

59 

CE 

PM    210 

IF    A=66    THEN    PRINT    "157 

7E20! 

80 

10 

38 

E9 

CC 

0A 

AB 

B9 

BB 

80C8t20 

4F 

54 

48 

45 

52 

23 

4B 

BB 

1    THAT    NEEDS    UPDATE": 

EN 

7E281 

39 

7E 

48 

B9 

38 

7E 

48 

4C 

9E 

8000:45 

59 

20 

54 

4F 

20 

45 

53 

Fl 

D 

7E30; 

73 

00 

20 

79 

00 

4C 

ED 

A7 

37 

8008:49 

54 

00 

3F 

3C 

3D 

3C 

IE 

F4 

QK    220 

IP    A=132   THEN    PRINT    " 

15 

7E38: 

5F 

7E 

5C 

7E 

9C 

7E 

99 

7E 

88 

80E0:81 

15 

17 

ID 

IB 

03 

01 

00 

77 

71CR":END 

7E40: 

68 

81 

EA 

7E 

ED 

7E 

38 

ac 

ID 

80E8:AA 

AA 

AA 

AA 

AA 

AA 

30 

00 

E9 

XK    230 

IF    A=192    THEN    PRINT    ' 

15 

7E48: 

49 

7E 

20 

DF 

7E 

8D 

22 

D3 

CA 

B0F0:A8 

AB 

A8 

A8 

A8 

AB 

00 

00 

F7 

91": END 

7E50! 

90 

02 

40 

20 

DC 

7E 

9D 

23 

BD 

80F8:55 

55 

55 

55 

55 

55 

00 

00 

F9 

CR    240 

PRINT    "UNRECOGNIZED    DRI 

7E58: 

D0 

80 

03 

40 

60 

A2 

01 

2C 

41 

8100:54 

54 

54 

54 

54 

54 

09 

90 

36 

VE" 

7EG0: 

A2 

08 

A0 

01 

29 

BA 

FF 

20 

E0 

8108 :FF 

FF 

FF 

FF 

FF 

FF 

00 

09 

0B 

76    COMPUTERS  GaiattB     Juty  1989 


eil8-PC  FC  FC  FC  FC  FC  00  U  2D  83B8!A6  C9  00  FB  03  20  7F  86  B2  B66fl:5B  BD  9C  8D  85  5ft  IS  69  26 

llltfm    01  03  01  03  01  II    01  EE  a3Ca:aS  10  EF  C.  10  EA  60  20  C7  B668:D4  85  5C  68  60  20  77  B6  4C 

8120:03  01  00  01  06  01  00  01  2ft  B3C8:CC  83  35  A6  AU    il    90  EE  CC  8e70:85  A7  Bl  59  B5  A6  60  23  9D 

8128:06  01  00  81  10  01  00  00  03  83D0:CD  83  D0  03  EE  CE  83  60  04  8678:59  86  Bl  SB  29  0F  63  20  26 

8130!B0  FF  FF  80  FF  FF  80  B0  FC  B3D8:ft2  00  A9  00  9D  47  90  9D  2F  8680:59  36  A5  A6  91  59  A5  A7  DF 

8133:80  B9  FF  FF  80  80  80  80  23  83E0:CF  90  E8  D0  F7  8D  41  85  9B  8688:91  5B  60  20  59  86  91  5B  A6 

ai40-FF  FF  80  80  80  80  FF  FF  61  83B8:60  fl9  F8  2C  A9  08  A2  01  20  8690:60  20  59  86  91  59  63  20  3C 

8148180  80  80  80  FF  FF  00  80  44  83F0:M  07  ft9  F8  2C  ft9  08  ft2  ftl  8698:41  8B  ft0  0D  ft2  0D  ft9  00  ftft 

B150:7F  00  80  40  00  80  7F  80  ft8  83Fa:a0  18  75  05  C9  70  89  E8  5F  86ft0:20  91  86  AD  57  82  20  BB  5E 

ei58:FF  7F  80  00  40  80  FF  7F  CE  8400:95  05  60  EE  59  B2  4C  BC  89  e6R8:86  CA  10  f2  88  10  ED  60  90 

8160:00  FC  FF  00  04  80  00  FC  CI  8403:84  CE  59  82  ft2  03  AD  59  30  B6Ba:A2  0D  20  03  86  CA  10  FA  01 

ai6B:FF  A9  80  BD  8A  02  AD  21  97  8410:82  9D  29  DO  CA  10  FA  60  E0  86BB:60  A2  00  20  3C  89  A4  B2  80 

8170:D0  80  76  84  AD  20  D0  BD  73  841B:EE  56  B2  4C  21  84  CE  56  52  86C  :4C  Cfi  86  ft2  01  20  3C  80  23 

8178:7B  84  AD  86  02  8D  80  B4  44  8420:82  AD  56  82  8D  21  DO  29  84  86C8:A4  FE  29  A2  B3  20  DD  BD  AD 

8180:20  44  E5  A2  07  A9  00  9D  08  842a:aF  Aft  BD  47  84  8D  86  02  FB  86D0:20  E8  86  A9  01  A0  01  85  A5 

8188:00  38  CA  10  FA  85  FE  BD  6D  8430:20  B9  86  20  C3  86  20  06  09  86DB:35  84  36  A0  00  Bl  35  F0  94 

B190S1C  DO  A2  2F  BD  E7  B0  9D  49  8438:87  A2  00  AD  86  02  05  04  D2  a6E0:06  20  16  E7  C8  D0  F6  60  IZ 

ei98:D0  38  CA  10  F7  78  A9  33  94  8440:90  99  03  EB  D0  FA  60  01  FS  a6E8:AO  92  91  D0  03  20  F5  86  85 

81A0!a5  01  A2  27  BD  IB  D3  9D  91  8448:06  01  90  01  00  01  00  01  A9  a6F0:AD  93  01  DO  10  A2  02  BD  8F 

aiAa;50  39  CA  19  F7  ft9  37  85  D6  B459:07  02  07  01  00  01  06  EE  4D  B6FS:01  01  9D  02  01  Cft  10  F7  E5 

aiB0:01  58  ft9  40  A2  00  A0  04  DD  8458:58  82  60  CE  58  82  60  A9  5E  B709;ft9  30  BD  01  01  69  A0  01  7D 

aiB8-20  75  7F  91  35  18  69  01  10  8460:90  85  05  85  06  60  20  D4  Bft  8708:A2  09  A9  2B  20  31  87  A2  0A 

81C0-C8  CO  24  00  F3  E8  E0  96  F4  8468:8C  78  A9  31  8D  14  03  A9  8ft  8710:18  A9  2A  20  31  87  C8  CO  D6 

BlCBiOO  EC  A9  DF  BD  FB  07  20  21  B470:EA  8D  15  03  SB  A9  06  80  2B  8718:0F  D0  ED  A2  0A  A0  00  A9  47 

81Dg-9C  84  A2  05  BD  DB  80  BC  BA  8478:21  DO  A9  01  80  20  D9  A9  C3  8720:2E  29  31  87  A0  OF  A9  2C  AD 

aiD8:El  89  99  00  D0  CA  10  F4  E6  B4B0:01  8D  86  02  A9  00  30  15  DB  8728:20  31  87  E8  E0  18  DO  ED  Oft 

B1E0-78  fi9  A4  80  14  03  ft9  7F  77  8488:00  20  44  E5  A2  3F  8A  20  30  8730:60  20  75  7F  91  35  AD  86  61 

81E8:8D  15  03  SB  A2  01  BD  02  74  8490:A2  8A  CA  10  F9  68  68  20  4A  8738:02  91  9E  60  IE  81  18  10  BO 

81F0:40  9D  22  D0  CA  19  F7  20  73  8498:?!  84  29  90  BC  20  67  BC  FF  8740:29  FD  88  A2  91  B5  05  18  IB 

BlFBiDB  83  20  4F  85  29  9A  86  AA  84A0:D0  4E  AO  09  Bl  61  AA  C8  DA  8748:70  3C  87  38  FO  00  D0  B0  DB 

8200:20  C0  BS  29  21  84  20  43  96  84A8:B1  61  90  00  92  48  C8  Bl  8F  8750:0B  BD  00  DO  3B  E9  08  90  78 

829B-87  2C  50  82  30  07  20  40  CD  84B0:61  90  09  93  48  C8  Bl  61  35  8758:90  DO  B0  E9  DD  3E  87  90  07 

8210:87  3B  6E  50  82  2C  5C  82  8A  84BB:9D  00  94  C8  Bl  61  9D  00  FD  8760:9B  BD  00  D0  IB  69  0B  90  85 

8218-30  07  20  43  87  38  6E  SC  85  84C0:95  AS  61  18  69  05  9D  09  46  8763:00  00  90  09  Cft  10  D6  ftS  45 

8220:82  AS  FE  C5  FD  B5  FO  F0  FE  84C8:96  A5  62  69  90  9D  00  97  77  8770:05  IB  69  IE  38  ED  00  D0  61 

8228:03  20  C3  86  20  E4  FF  ftE  DA  84D0:8E  DA  B4  68  AA  68  20  EA  11  8778:80  B6  87  A9  DB  a6  04  FO  69 

8230!ftB  82  DD  AB  82  F0  62  CA  89  84D8:8B  A2  00  18  7D  00  96  9D  88  8780:03  CB  29  FE  BC  FA  07  8C  43 

8238:00  F8  BA  86  FC  A2  0F  DD  12  B4E0:00  98  BD  00  97  69  00  9D  C7  8788:FB  07  BC  FC  07  8C  FD  07  26 

B240:DA  E8  F0  lA  CA  10  F8  38  6D  84E8:00  99  20  23  8C  4C  90  84  E3  8790:CB  C8  8C  F9  07  0A  0A  69  4S 

824a:E9  30  90  BD  C9  Oft  B0  B9  CD  B4F0:60  AO  08  A9  92  80  FD  84  39  8798!4B  BD  D5  BB  A5  06  18  69  02 

8250:8D  5B  82  4C  09  82  00  01  SB  84F8:A9  00  AA  9D  00  92  E8  00  F2  87A0:31  38  ED  01  00  80  BF  87  19 

8258*07  06  02  09  80  80  AS  04  F7  8500:FA  EE  FD  84  88  DO  F4  60  IE  87A8:0ft  Oft  0A  69  7A  BD  DB  88  61 

8260:D9  14  AD  16  DO  29  10  F0  26  8508:AO  16  DO  29  10  F0  El  A5  C9  87B0:A2  01  20  Ol  88  A9  00  29  86 

8268:04  E0  08  B0  9C  8E  57  32  04  8519:04  49  08  85  04  AD  16  00  9C  87B8:1S  OA  0A  8D  CF  87  A9  00  60 

8270:BE  29  DO  4C  09  82  8A  AE  B9  8518:29  10  F0  04  A0  00  ft2  OD  B2  87C0:29  08  0A  0A  0A  8D  D7  87  06 

827B:5A  82  EO  02  90  0F  C9  08  E3  3520:20  77  86  29  07  05  04  20  F0  87Ce:A2  02  BD  C7  88  18  69  00  55 

8280:80  08  8D  20  D0  09  0B  80  DB  B528:8B  86  CA  10  F3  88  10  EE  CS  8700:80  D5  88  BD  CB  88  69  00  SC 
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8B20:20  00  8C  20  67  BC  B0  13  BC  aDCB:35  6B  20  09  8E  91  9E  E6  0C  3FQ0:03  03  03  07  0B  06  0C  0E  08 

8B28:A0  00  Bl  61  CS  B2  90  05  FA  8000:36  C6  9F  CA  10  E9  88  10  A2  3FB8:3F  CF  FF  FO  FF  7F  30  38  70 

aB30:ia  69  FF  91  61  20  23  8C  25  aODStDC  20  BC  8F  A2  00  A0  06  8B  3FC0:F0  10  F0  CO  EO  E0  EO  70  A2 

aB3B:4C  23  8B  20  9E  8B  4C  15  82  8DE0:20  77  B6  BD  F7  8D  8C  FC  9f  3FC8:0F  OF  0F  03  07  07  0E  0B  ID 

8B40:3S  A2  05  20  3C  80  20  SB  D9  8DEB:8D  A9  00  33  ED  FC  8D  A8  81  3FD0:FF  Fl  FF  3C  7E  7E  38  3C  2A 

8B4B:3B  F0  02  68  68  4C  58  BA  D7  8DF0:2O  77  86  80  FE  80  A9  00  25  3FD8:B0  FO  90  FO  80  F0  C0  80  7E 

8B50:20  E4  FF  FB  FB  C9  S9  60  D9  8DF8:20  BB  86  A0  00  A9  00  20  AB  3FE0:0Z  0E  08  0F  0F  0F  04  06  9B 

8B58:78  20  88  8B  20  04  BC  20  0B  8E00:8B  86  B8  10  DB  CA  10  D6  97  3FE8:E0  8F  89  FF  FC  FF  C2  83  DO 

8B60:9A  86  A5  B2  48  20  94  BB  BD  8E0B:60  85  26  A5  04  F0  10  AS  7F  3FF0:C7  80  BF  FC  FF  EC  C6  C3  83 

8868:68  85  B2  20  00  8C  20  67  47  8E10:26  29  55  0A  85  27  A5  26  10  3FF8:38  38  30  7F  76  30  30  33  AC 

8B70:8C  B0  13  A0  00  Bl  61  CS  BS  8Eia:29  AA  4A  05  27  85  26  86  30  4000:F2  C8  F7  F0  00  02  01  00  44 

8B78:B2  90  OS  18  69  01  91  61  03  8E20:2B  A2  07  06  26  66  27  CA  IF  4008:00  20  FA  Bl  04  01  32  01  34 

8B30:20  23  BC  4C  6E  BB  58  60  79  8E2a:10  F9  A6  28  AS  27  60  20  CD  4010:01  00  F9  F8  64  04  02  02  19 

8BB8:20  8B  8B  AO  30  CA  D0  FD  D8  8E30:7E  8F  A9  92  85  36  85  9F  7E  4018:01  00  00  20  FE  Fl  B9  03  51 

8B90:88  DO  FA  60  A9  FF  85  B2  93  8E38:A9  0E  85  26  AO  00  84  35  04  4020:02  01  01  00  FC  FB  F9  F9  C7 

8893:20  4F  8C  90  19  60  20  9A  53  8E40:A9  6F  85  9E  A2  37  Bl  35  33  4028:04  02  01  00  00  20  F7  Fl  AD 

8BA0:86  20  4F  8C  80  El  20  70  73  8E48:48  Bl  9E  91  35  68  91  9E  EF  4030:07  OS  02  01  01  00  F4  F3  AB 

eBA8:8C  80  Bl  88  AD  16  D0  4A  0A  BE50:E6  35  C6  9E  CA  10  EF  E6  4E  4038:27  07  07  02  01  01  00  F6  12 

78     COMPUTBI'S  Oazelte     July  19B9 


4a4fl-F5    91 

Fl    09    02 

01 

01 

00 

05 

3E88: 

FF 

FF 

FE 

FA 

E8 

A3 

80 

33 

SF        4130:CA 

0A   06    07    04    01    00   BS   AS 

^m  V  ^  V    '    ^     ^          ^  ■*' 

4  34  8 !FC    FB 

FB    BB    0B 

02 

01 

30 

3B 

3E90: 

AF 

AF 

2B 

0A 

92 

00 

00 

30 

E6        413B:E9 

B6    B7    BB   CF    00    B4    Bl    AC 

T    1/   ^    W     *     'h     \^            *-    *^ 

43B3:00    20 

FD    Fl    A8 

06 

02 

01 

lA 

3E9a: 

33 

33 

30 

00 

00 

00 

02 

02 

IB 

tl40:A7 

AS    AB    AA    A9    B3    B0    B2    50 

4058:00    00 

20    FF    Al 

01 

30 

00 

ED 

3EA3: 

BA 

0A 

0A 

02 

02 

00 

00 

00 

16 

U48:ad 

AC    AE    00    AF    EA    AE    30    29 

3EA8* 

00 

33 

30 

00 

00 

02 

0A 

0A 

4B 

US0:33 

30    00    9A    IC    IC    IC    BA    10 

Program  3: 

3C:13!83    99 
3C18;FE    FB 
3C20:DF    F7 
3C28!a3    83 
3C33:FF    FF 
lf*"^R*Afl     AA 

Demo.FlleZ 

3EB3 

33 

02 

0A 

2B 

AF 

BF 

BF 

BF 

SO 

4158:FC 

4A    4C    AC    4C    DC    FC    BC    IC 

99    83    99 
7A   FA   E8 

F7    F7    FF 
A0    EB    FA 
FF    FS    FF 

FF    FF    FF 

99 
A3 
FF 
FA 
FF 
FF 

83 
80 
FF 
7E 
AA 
FF 

FF 
00 
FF 
DE 
A8 
FF 

56 
99 
06 
03 
36 
AF 

3EB8 
3EC0 
3EC8 
3ED3 
3ED8 
3EE0 

A0 
EB 
AB 
FF 
.FA 
:7F 

A0 
E8 
A3 
FF 
FA 
7F 

A0 
FA 
A0 
55 
FA 
FE 

A0 
FA 
A0 
55 

FE 
FE 

A3 

EA 
A0 
55 
7E 

FE 

AO 
AA 

A0 
56 
7E 

FE 

BB 
A0 
A0 
5A 
FF 
FA 

00 
03 
A0 
6A 
FF 
FA 

54 
3E 
49 
70 
CE 
Bl 

4160:CA 
4168:8C 
4170:07 
4178:EB 
4180:AA 
4188:30 

lA    9C    FC    FC    FA    6A    BA    9S 
3A    lA    BA    0A    0A    8A    07    34 
34    01    00    20    FF    EB    A8    19 
CF    00   B4    E8    A7    A6    AB    BF 
A9    FE    E7    E6    E5    AC    AE    F7 
23   23    20    03    33    00    33    19 

AF    AF    2B 

0A 

32 

00 

FE 

3EE8 

:55 

55 

SF 

5F 

5F 

SF 

FF 

FF 

BF 

4190:FA 

FC    FC    FC    FA    BC    FC    FC    01 

3C48:80    80 
3C50:A0   A0 
3C58:00    00 

^0    00    00 

80 

00 

00 

21 

3EF0 

:F5 

FS 

FF 

BF 

BD 

BD 

AF 

AF 

D5 

4198:6C 

FC    FC    IC    FC    FC    FA    FC   CB 

A0    A0    A0 
30    00    00 

A0 
00 

A3 
80 

A0 
83 

C8 
52 

3EFB 
3F0  0 

:AD 

:95 

AD 
A5 

BF 
BF 

BF 
BF 

B5 
BF 

B5 
BF 

FF 
AF 

FP 
AF 

30 
B2 

41A0:FC 
41A8:09 

BC    FA   FC    FC    09    OA    09    29 
39    39    89    00    00    00    00    AB 

3C60:FE   FE 
3068:00    80 

FA    FA    E8 
A3    E8    FA 

A3 

FA 

80 
FE 

30 
FE 

Fl 
64 

3F08 
3F10 

!F5 
:00 

FF 
BB 

5F 
33 

5F 
00 

SF 
AA 

55 
AA 

55 

FF 

55 
F5 

B3 
84 

Program  4:  Demo 

3C70:FF    FF 

7F    5F    FF 

FF 

AA 

AB 

CC 

3F18 

:90 

B3 

32 

02 

02 

02 

0A 

0A 

20 

MF 

1000 

IFA=0THENA=1:PRINT" 

3C7a:A8    AA 

FF    FF    7F 

7F 

FF 

FF 

E9 

3F20 

:  2G 

AF 

AS 

AS 

AS 

AS 

29 

2A 

6F 

(CLR) {OOWHjPCEASE    WAIT 

3C80!B5    BD 

AD    AF    2B 

0A 

02 

00 

79 

3F28 

:FF 

FE 

AA 

AA 

80 

00 

03 

00 

6A 

":L0AD"CHR   GRAPHICS", 8 

3Caa:FF    FF 

FF    FF    FF 

FF 

FF 

F7 

F8 

3F30 

;BF 

FF 

FF 

FE 

AA 

AA 

30 

00 

7E 

,1 

3C93:30    02 

0A    28    AF 

AF 

BF 

BF 

F8 

3F3a 

tAA 

AA 

FF 

FF 

AA 

AA 

00 

00 

B6 

GS 

1010 

SYS31744 

3C98:02    02 

00    0B    00 

00 

03 

00 

92 

3F40 

:AB 

AF 

AA 

EA 

FF 

FF 

FF 

FE 

83 

HE 

1020 

POKE198,B:POKE532ai,0 

3CA0:0A   0A 

0A    0A    0A 

0A 

BA 

0A 

19 

3F4a 

:00 

00 

AA 

AA 

FF 

FF 

AF 

AF 

□  5 

MS 

1033 

PRINT"{CLR}{9    DOWtj}" 

3CA8:00    80 

A3    60    80 

BB 

03 

00 

5F 

3FSB 

:AA 

AA 

00 

00 

00 

00 

00 

00 

CB 

XA 

1050 

PRIKT"{9    RIGHTlGRAPHIC 

3CB0:00    00 

03    00    30 

83 

68 

AB 

9C 

3F58 

:00 

33 

30 

00 

00 

00 

AA 

AA 

D6 

S    BORROWED    FROM" 

3C6B:03    00 

03    30    80 

A0 

A0 

00 

FB 

3F63 

:30 

30 

30 

80 

80 

80 

A0 

A0 

CE 

SM 

1080 

PRINT" {DOWN) tl5    RIGHT) 

3CC0:5A   06 

F5    FD    AA 

AA 

00 

00 

BA 

3F68 

!F5 

FF 

FF 

FF 

5F 

SF 

FF 

FF 

SA 

GAZETTE'S" 

3CCe:00    83 

A0    EB    FA 

FE 

S5 

55 

D7 

3F70 

:FF 

FF 

PS 

F5 

SS 

55 

F5 

F5 

EE 

FB 

1110 

PRINT"{D0WN) (9    HIGHTlC 

3CD0:5A    5A 

5A    5A    56 

A5 

AA 

3A 

A6 

3F78 

:3A 

3A 

0A 

BA 

BA 

0A 

02 

32 

DE 

ROSSROADS    AND    Q-BIHO" 

3CD8:FF    FF 

FF    FF    FF 

FF 

SA 

5A 

60 

3FB0 

:F5 

F5 

FF 

FF 

F5 

F5 

BF 

BF 

3E 

SR 

1120 

DL0AD"DEM0.FILE1 

3CE0:2fi    AA 

BF    FF    FF 

FF 

SF 

5F 

2F 

3F88 

:2F 

28 

0A 

0A 

02 

33 

33 

00 

SB 

XF 

1130 

PORX=-2T063 

3CE8:5F    5F 
3CF3:FF    BF 

5F    5F    55 
AF    AF    FF 

A5 
FF 

AA 
5F 

0A 
5F 

6B 

68 

3F90 
3F98 

:5F 
:FA 

SF 
E8 

FF 
A0 

FF 
A0 

BF 
E8 

AA 
FA 

2A 
FA 

33 
FA 

93 

11 

GE 

1140 

FORM=0TO1:FORC=3TO20ST 

EPlB 

FORF=0TO8STEP2:3TAMPF+ 

M,X-C-F,C+F 

NEXT: NEXT : NEXT : HEXT 

DLOAD"DEMO.FILE2":P0KE 

3CFB:S3    02 
3D03:SA    3A 

AA    EA    FF 
0A    0A    29 

FF 
AS 

FF 
AA 

FF 
BA 

FS 
23 

3FA0 
3FAB 

:FE 
:AF 

FA 
BF 

FA 
FF 

FA 

FF 

FA 
BF 

FE 
AF 

FF 
FF 

FF 
FF 

40 
AB 

SG 

1153 

3D0B:FA   FA 
3D10:B8    2A 
3D1B:2B    BA 

FE    FF    BF 
AE    AF    AF 
3A    0A    02 

AF 
AF 
00 

2B 
EB 
00 

BA 
EB 
33 

BB 
E9 
9C 

3FB0 
3FB8 
3FC0 

!FA 
:F5 
:5A 

FA 
F5 
5A 

FA 
F5 
5A 

EB 
FS 
5A 

E8 
55 
68 

A0 
SS 
A0 

AA 
7A 
80 

AA 
FA 
30 

23 
BD 
BA 

FE 
BK 

1163 
1170 

3023:00    00 

0A    ZA    AF 

AF 

AF 

AF 

C9 

3FC8 

!00 

00 

00 

30 

A0 

A8 

AA 

AA 

F6 

53231, 15 

3D28tEB   AF 

BF    FF    FF 

FF 

FF 

FF 

7C 

3FD0 

:0A 

0A 

OA 

2B 

AF 

AF 

BF 

BF 

46 

CM 

1183 

PRINT"{CLR} (23    DOWN}" 

3D30:AF   AF 

BF    FF    FF 

FF 

FF 

FF 

66 

3FDe 

:55 

55 

55 

55 

B5 

AS 

2B 

0A 

FB 

AC 

1203 

PRINT"C9    RIGHT)>>>    PRE 

3D38:FF    FF 

AA   AA   FF 

FF 

AF 

AF 

CI 

3FE0 

:A0 

A8 

FA 

FE 

5F 

SF 

FF 

FF 

Al 

SS    ANY    KEY    <«" 

3D40:0O    00 

00    03    30 

33 

OA 

AA 

79 

3FEa 

:AA 

AA 

FF 

FF 

SF 

SF 

FF 

FF 

DF 

BC 

1213 

FORQ=0TO6STEP2:FORX=-l 

3D48:00   00 

40    50    -10 

03 

33 

00 

01 

3FF0 

:2A 

0A 

0A 

0A 

02 

03 

BB 

00 

FS 

T034STEP7 

3D50;FA    FA 

D5    55    05 

F5 

AA 

AB 

9B 

3FF8 

:33 

00 

00 

00 

00 

00 

0A 

2A 

B5 

GK 

1220 

STAMP(XANDl)+0,X,3*0:N 

3D58:FF    FF 

5F    5F    FF 

FF 

FF 

FE 

B3 

4030 

:82 

D8 

F7 

FB 

00 

05 

07 

01 

29 

EXT: NEXT 

3D60:AA    AA 

80    30    03 

30 

00 

00 

EA 

4038 

:30 

20 

20 

20 

20 

20 

23 

20 

78 

HA 

1233 

FORQ=0TO6STEP2!FORX--1 

3D6B:FF   FF 

FA    EA    A8 

A0 

80 

00 

B9 

4010 

:20 

20 

23 

05 

06 

FD 

FC 

F9 

AC 

T034STEP7 

3070:83    00 

30    30    00 

30 

00 

00 

2B 

4018 

:D4 

FB 

EE 

F7 

F8 

03 

FA 

ED 

5A 

DF 

1243 

STAMP(N0TXAND1)+Q,X,3* 

3078:32    00 

30    33    03 

30 

00 

00 

F3 

4020 

:F6 

CF 

EF 

F0 

F4 

F5 

F3 

00 

84 

Q:tiEXT:NEXT 

3D80:AA   AA 
3D88:AB    AA 

AB    AF    AF 
AA    EA    FF 

BF 
FF 

FF 
FF 

FE 
FE 

E6 
86 

4028 
4030 

:d2 
:39 

F2 
0D 

Dl 
FD 

00 
ID 

CD 
20 

BD 
10 

30 
AD 

80 
00 

23 
SB 

XH 

12S0 

GETKS: IFKS=""THEN1210 

3D90:BF   FF 

FF    FF    FF 

FE 

AA 

AA 

E6 

4038 

:BD 

0D 

BD 

99 

00 

BD 

9D 

3D 

43 

PFFORF  TYPINR 

3D9B:2A    3A 

32    00    00 

02 

0A 

0A 

11 

4040 

109 

0D 

90 

3D 

0D 

39 

3D 

0D 

C0 

. 

3DA3:3A    2A 

AF    AF    AF 

AF 

AF 

AF 

E6 

4048 

:3D 

ZD 

A9 

BO 

00 

0D 

ID 

31 

78 

Beiors  typing  in  programs,  piease 

3DA8t98    33 

33    32    0A 

0A 

02 

00 

BF 

4050 

:35 

07 

01 

B0 

CB 

E2 

E2 

CA 

AF 

refer  to 

"How  to  Type  In 

3DB3:90    33 

A0   A8    EA 

FA 

FF 

FF 

0D 

4058 

:C9 

E4 

El 

CB 

DA 

D7 

CE 

E3 

74 

COMPUTEl's  Gazette  Programs," 

3DB8:03    00 

00    00    A0 

AS 

FA 

FA 

CB 

4063 

:0D 

D9 

20 

E3 

DF 

DC 

CC 

23 

B4 

elsewhere  in  this  issue. 

3DC0:FF   FF 

FF    FF    FF 
80    A0    A0 

FF 
80 

FF 
00 

FF 
00 

3B 
64 

4068 
4073 

:CE 
:D8 

DE 
20 

DB 
00 

EC 
20 

20 
20 

23 
20 

Fl 
20 

CO 
00 

85 
36 

3DC8:03    00 

3DDB:A0    8B 

30    00    83 

A0 

A0 

00 

83 

4078 

:4D 

6D 

9D 

FD 

ID 

40 

BD 

BD 

84 

3DD8:FA    SA 

56    55    D5 

FE 

FA 

E8 

11 

40B0 

:1D 

F9 

00 

FD 

00 

CD 

8D 

00 

57 

Math  Monif* 

3DEB:33    03 

33    33    S3 

80 

A0 

E8 

BB 

4088 

:0D 

00 

90 

C9 

DO 

3D 

00 

AO 

CE 

III 

UtII 

iiiugiu 

SDEBjFF    SE 

5A    5A    56 

A5 

AA 

0A 

94 

4090 

:09 

AD 

0D 

80 

90 

99 

9D 

20 

37 

3DF3:FF    5F 

5F    FF    FF 

FF 

FF 

FF 

2F 

4098 

!9D 

B9 

32 

06 

03 

01 

02 

C7 

DE 

Article  on  page  2y. 

3DFB:00    33 

30    AA    AA 

FE 

FF 

FF 

6F 

43A3 

!CS 

C2 

BF 

BC 

20 

C6 

C4 

CI 

DF 

FH 

10    REM   COPYRIGHT    19B9    COMPU 

3E00;FF   5F 

5F    5F    55 

A5 

AA 

0A 

D6 

4BA8 

;BE 

BB 

B9 

00 

C3 

CB 

BD 

BA 

36 

TE!     PnRLir!ATir)NS  .     INC.     - 

3E0B:BF   FF 
3E10!03    00 
3E18;AF    2B 
3E20:Ffi    FF 

FF    FF    FF 
30    00    02 
BA    3A    29 
FF    FF    FF 

FF 
0A 
AS 
FF 

FF 
2B 
AA 
FF 

FF 
AF 
0A 
BF 

64 
CA 
58 
D9 

40B0 
43B8 
40C0 
40CB 

:00 
:1E 
:9E 
:A4 

4E 
0E 
BE 
A2 

AE 
0E 
DE 
9F 

0E 
0E 
03 
9C 

EE 
10 
06 
99 

IE 
0E 
03 
96 

0D 
BE 
01 
A3 

CE 
BE 
02 
Al 

54 
B9 
60 

12 

FR 

23    X 

r 

ALL    RIGHTS    RESERVED 
=RND(-TI) :SCNCLR:C0LOR4 
1:FAST:GOSUB1050:POKES3 

3E28:00    00 
3E30:AF    AF 
3E38:00    00 

00    00    00 
AF    2B    2B 
00    00    00 

80 
BA 
BA 

A0 
0A 
2A 

EA 
02 
AF 

D2 
D0 
E0 

40D0 
40DB 
40E0 

:9E 
:97 
:0E 

9B 
00 
CE 

9B 
0E 
IE 

95 
0E 
3E 

00 
9E 
8E 

A0 
3E 
AD 

90 
FE 
0E 

9A 
BE 
0E 

4C 
01 
19 

HP 

30    PRINT"(HOKE:}*'T?VB[13)"i7> 
(RVS)     MATH    MAGIC    {OFFl"! 

3E40:F5    FF 

FF    5P    5F 

55 

55 

55 

FD 

tOEB 

:DE 

0E 

0E 

FD 

34 

35 

03 

02 

3A 

PRIMTTAn(L2) "(2    DOWNJCOP 

.    »    *^       W      .rm  ■    B  ^mm,                   «        J^      J^      «H       It 

3E48:00    00 

0B    30    00 

00 

00 

30 

45 

40F0 

:01 

D3 

92 

8F 

8D 

8B 

94 

91 

87 

YRIGHT    1989" 

3E50S00    00 

00    00    A3 

A8 

FA 

FE 

69 

4  0F8 

:B8 

BB 

BA 

93 

93 

SE 

8C 

89 

EF 

AC 

40    PRINTTAB(7) "COMPUTEl     POB 

3E58:00    00 

00    00    00 

02 

3A 

2B 

IC 

4100 

:0A 

FA 

0A 

2A 

BA 

BA 

3A 

FA 

Bl 

LICATIOHS,     INC.":PRIHTTA 

3E60:A0   A0 

80    80    80 

80 

33 

00 

73 

4108 

:2A 

DA 

0A 

a  A 

lA 

0A 

3A 

05 

52 

B(13)"ALL    RIGHTS    RESERVE 

3E68:D7    D7 

FF    FF    AF 

AA 

3A 

00 

33 

4110 

:05 

33 

02 

01 

D3 

92 

87 

B5 

A3 

D 

3E73:0A    0A 

0A    02    02 

02 

30 

00 

ED 

4118 

:8B 

94 

BB 

BB 

84 

BA 

93 

88 

26 

HG 

50    PRINTTAB(11)"{2    DOWK ) 1    - 

3E78:30    00 

00    00    00 

00 

A0 

AB 

DE 

4120 

:86 

83 

89 

0A 

9A 

0A 

9A 

FA 

C5 

ADDITI0H":PRINTTAB(11) " 

3EB3:Ea    A0 

80    00    00 

30 

30 

00 

A9 

4128 

:AA 

3A 

0A 

9A 

BA 

BA 

BA 

BA 

34 

2 
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ME  60 

GJ  70 
HF  30 


SS  90 


cc 

lee 

OB 

110 

SM 

120 

Hh 

130 

KQ 

140 

SR 

1S0 

SK 

160 

QB 

170 

MR 

130 

QH 

190 

BQ 

200 

SG 

210 

JJ  220 


QM  230 


KF  240 


BB  250 

CG  260 
DF  270 
JF  280 


RK  290 
GK  im 

QP  310 


AM  320 
QJ  330 

AB  340 

DX  350 
GK  360 

RE  370 
JE  380 
BB  390 
QH  400 

DH  410 


B(ll)"3  -  MULTIPLICATION 

";PRtNTTAB(ll) "4  -  DIVIS 

ION";SL0W 

PRINTTftB(ll)"{2  DOWN}SEL 

ECT  TYPE  (1-4) " 

GETKEV  A5 

IFA$  =  "1"THENPRS-="A":SI$  = 

"+":ELSEIFA5="2"THENPR5= 

"S":SI5="-":ELSErFA$="3" 

THENPRS="M":SI$=""X":ELSE 

IFAS  =  "4"THENPRS  =  "0":S1S'= 
"/":ELSE70 

PRINTTAB(ll) "{2  DOWMlENT 

ER  LEVEL  [1-13) 

{6  SPACES}{6  LEFT)";:INP 

UT  LE 

IFLE<10RLE>13THRHPRINT" 

(3  UP)"; :GOTO90 

FAST: VOL0:GOSUB620:GOSU 

BB20:GOSUB270!VOL15:SLO 

W 

[JO=VAL{TI$)  :II»IHT(tIU/S 

) :POKES6244+II,0 

IFII>=11THEN830 

IFJOy (2)=3THENXP=XP+5:I 

FXP>19STHENXP"186:PLAY" 

OlSF" 

IFJOY {2) =7THENXP»XP-5:I 

FXP<40THENXP=45:PLAY"O1 

SF" 

MOVSPR1,XP,200 

IFJOY (2) =128THENGOSUB19 

0:GOSUB 270: POKE  204 0,56 

GOTO  120 

POKE2040,57:CC-CC+1:HOV 

SPR3,XP,190:SPRITE3,1,1 

,0,0,0,1 

FORY=19  0TO8  0STEP-1:HOVS 

PR3,XP,Y:NEXT 

IFXP>3  9ANDXP<66THENCH=1 

:ELSEIFXP>67  ANDXP<104T 

HEN  CH  =  2:ELSEIFXP>103At) 

DXP<160THENCH=3:ELSEIFX 

P>161ANDXP<225THENCH=4 

IFSA=CHTHENTEMPO50:PLAY 

"0O2»GO3ICF#GF»G":FL-l: 

SC=SC+10:SCS-STRS(SC) :R 

R=RR+1:C1=C1+1 

IFFL=1THENCHAR1,30,7,SC 

S, 1 : COLORS, 1: CHAR  1,31,1 

9, "{8  SPACES}", 1 

IFFL-0THENTEMPO25:P[,Ay" 

HO1»CIDE#CG":SPRITE3,0, 

6,0,0,0,1:POKE20  40,56;G 

OTO120 

FL=0:SPRITE3, 0,6, 0,0,0, 

1 

RETURN 

IFC1>4ANDLE=13THEN830 

IFC1>=5THENTI$="00  0000" 

:C1=0:SOUND2, 20000, 50,0 

,2000, 100 :LE=LE+1:GDSUB 

820 

A1=INT(RND(1)*12) +1:AZ= 

CE 

IFLE-13THENA2=IHT (RND (1 

)*12)+1 

IFPRS="A"0RPR5="S"THENI 

FLE<2THENA2=INT (RND(l) * 

8)+l 

L2=LE*10 

IFPR$="A"ORPR$="S"THENA 

2=INT(RND(1) *L2)+1 

IFPRS="S"ANDA1<AZTHENT= 

Al;fil=A2:A2=T 

AN"A1*A2 

IFPRS="D"THENT-A1:A1=AN 

:AN=T 

IFPRS="A"THENAN=A1+A2 

IFPR$="S"THENAH=A1-A2 

F0RI=1T04 

T  =  INT  (RNDd)  *10)  +  1 

A(I) =AN+T 


CR  420  IFA(I)-ANTHEN400 

HE  430  AI$(I)=STR${A(I) ) 

JR  440  NEXT 

DX  450  P=INT(RND(1) *4)+l:AIS(P 

) =STR$[AN) :SA=P 
SF  460  FORI=1T04 
EF  470  LL-LEN (AI${I) ) 
RK  430  IFLL=2THENAI5 (I) ="  "+A1 
S{1) 

GJ  490  IFLL=4THENAIS(I)=RIGHTS 
(AI5(I),3) 

OA  500  NEXT 

CJ    510    PRINT" {HOME) (OFF) 

(2    DOWN] {2    RrGHT}";AI5( 
1) ?"(3    RIGHT}";AIS(2) ;" 
(3    RIGHT}";AIS(3) ;" 
(3    RIGHT)";AI§(4) ; 

FH    520   A1$  =  STR$(A1)  :A25="STRS(A 
2) 

AP    530    LA-LEN{A1$) :IF    LA=2    THE 
H    A15=A1$+"    " 

CD  540  PPS"A1S+SIS+A25+"  " 

QC  550  SPRITES, 1,2, 0,0, 0,1 

XC  560  SOUNDl, 1000,5, ,, ,3 

GQ  570  HOVSPR5,280,200 

HD  580  FORSL=1TO250:NEXT 

JA  590  SPRITES, 0,2,0,0,0,1 

GA  600  COLOR5,1:CHAR  1,31,19,P 
PS.l 

PQ  610  RETURN 

DB  620  SCNCLR 

MF  630  COLOR  9,2 

FQ  640  PRINT"{7>{RVS} 

{26  SPACES) IBLK) 
{14  SPACES)"; 

UK    650    PRirJT"<7HRVS)     (RED) 
(5    SPACES] {BLK]     {YEL} 
(5    SPACES)  (BLK]     [OTiH] 
{5    SPACES) {BLKl     {BLU) 
{5    SPACES) [BLK)    {7} 
{BLK){14    SPACES)"; 

DJ    660    PRINT"'C7HRVS)     {RED) 
{5    SPACES) {BLK}     {YEL} 
{5    SPACES) (BLK}     {GRN) 
{5    SPACES) (BLK)     (BLU) 
(S    SPACES) (BLK)     t7> 
{BLKl(14    SPACES)"; 

OH    670    PRINT"{7>{RVS)     {RED) 
{5    SPACES){BLK)     (YEL) 
{5    SPACESJ(BLK)     (GRN) 
{5    SPACESHBLK)     (BLU) 

(5  spacesHblk)  iiy 

{BLK){14    SPACES)"; 
EX    680    PRINT"<7>(RVS]     {OFF} 

(BLK)     {5    UJ    {5    U}-    {5    U} 
{5    UH7KRVS)     {BLK} 

{14    SPACES}"; 
GP    690    PRINT"{7>{RVS)     (OFF) 

(24    SPACES)(7}'{RVS} 

(BLK) {14    SPACES)"; 
AR    700    FOR    I=1T016 
FG    710    PRINT"{7>{RVS}    iS} 

(OFF]{22    SPACES){8} 

(RVS]    i7}    (BLK) 

(14    SPACES}"; 
CS    720    NEXT 
CQ    7  30    PRINT"<7>(RVS]     {8> 

(24    SPACES)(7J     {BLK} 

{14    SPACES}"; 
AM    740    PRINT"<7KrVS} 

{26    SPACES) {BLK) 

{14    SPACES)"; 
KD    750    PRINT"{BLK)"; :FORI=1984 

TO2023:POKEI ,160:NEXT 
KK    760    PRINT"{RED)"; :CHAR1,27, 

0,"    MATH    MAGIC    ",1 
RF    770    PRrNT"{RED)"; :CHAR1,29, 

5,"    SCORE    ",I 
BS    7  80    CHAR  1,29, 10,"    LEVEL    ",1 
BE    790    SPRC0L0R1,9:SPRITE1,1,1 

,0,0,0,1:SPRITE    4,1,6,0 

,0,0,1:HOVSPR   4,255,195 

sMOVSPR  1, 100,200 


PR  800  XP"100!SC$""0":TIS»"000 

000":SC=0 
FQ  810  TMS="(RVS) CgRN] 
(4  SPACES) {YEL] 
{4  SPACES) {RED] 
(4  SPACES) (OFF}" :RETURN 
EK  820  C0L0R5,l!LE$=STRS(LE) !C 
HAR1,30,7,SCS,1: CHAR  1,3 
0,13,LES,l:CHARl,2a,23, 
TMS:C0L0R5,1: RETURN 
RA  830  IFCC=0THENCC=1 
MK  840  POKE53281,6:QQ=INT { (RR/ 

CC) *100) :QQS=STR$(QQ) 
MB  850  SCNCLR 
PF  860  POKE53269,0 
EK  870  SLOW 
PP  8B0  PRINT"{7J":CHAR1,14,5," 

GAME  OVER  ",1 
MD  890  IFC1=5ANDLE-13THEN910 
AD  900  TEMPO40:PLAY"O3HGAGRDO4 

RC0  3C":GOT098r. 
MB  910  SPRITE4,l,6,r  0,0,1:MOV 

SPR4,168,103 
SA  920  CHAR1,1,3,"C0NGRATULATI 
ONS,  YOU'VE  GRADUATED  11 
J",l 
MA  930  CHAR1,5,4,"  YOU  HAVE  EA 

RNED  THE  TITLE  OF  ",1 
BX  940  CHAR1,15,5,"  MATH  WIZ! 

{SPACE)",1 
JP  950  TEMPO30:PLAY"T6OlQGAQaO 
2QDQCCQEQDQDQGQtlFQGQD01 
QBQGAQBO  2QCQDQEQDQC01QB 
QA0BQGQ#FQGQAQDQ»FQA02Q 
CO lQBQA0BQG0AQBO2aDQCQC 
QEQDQDQGQIFQGQDOIQBQGAQ 
BOE0  2QDQC01QaQA" 
KA  960  PLAY"QGQDQGQ#FQG" 
MR  970  COLOR5,1 
QJ  980  CHAR1,17, 12, "SCORE", 1;C 

HAR1,17,13,SCS 
RE  990  CHAR  1,15,15,"%  CORRECT 

",1:CHAR  1,17,16,QQS 
XR  1000  CHAR1,10,18,"  PLAY  AGA 

IN  (Y/N)?  ",1 
RH  1010  GBTA$:IFAS=""THEN1010 
JS  1028  IFA$="Y"THENSCNCLR:POK 
E53269,0:POKE2040,56:F 
AST:RUN 
PP  1030  IFAS="N"THENEND 
HS  1040  GOTO1010 
SP  1050  FORX=3584TO3904:READPS 
:P=DEC[PS) :POKEX,P:PT= 
PT+P:NEXT 
JE  1060  IFPT<;>17937THENSLOW:PR 
INT"{DOWN}DATA  STATEME 
NT  ERROR.": STOP 
MC  1070  RETURN 

HE  1080  DATA00,00,00,00,00,00, 
00,10,00,00,54,00,00,0 
C,00,00,DC,00,3F,DF,F0 
,FF,DF,FC,F0,DC,3C,F0, 
DC,  3C,30,DC,30,3C,54,F 

0 

SM  1990  DATA0D,11,C0,03,FF,00, 
00, 30, 00, 00, FC, 80, 00, F 
C,00,00,FC,00,00,FC,00 
,00,30,00,00,30,00,00 

DH  1100  DATA00,00,00,0a,00,00, 
00,30, 00, 00,30, 00, 00, F 
C,00,00,FC,00, 3F,FF,F0 
,FF,FF,FC,F0,FC,3C,FC, 
FC,FC,0F,FF,C0,00,FC 

JM  1110  DATA00,00,30,00,00,30, 
00, 00, 30, 00, 00, FC, 00,0 
0,FC,00,00,FC,00,00,FC 
,00,00,30,00,00,30,00, 
00 

CM  1120  DATA00,00,00,00,00,0O, 
00,10,00,00,54,00,00,1 
0,00,00,10,00,00,10,00 
,00,10,00,00,10,00,00, 
10,00,00,10,00,00,54,0 
0,01,11 
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KB  1130  DATA00,03,H 
00,00,90,00 
0,00,00,00, 
,00,00,00,0' 

BB  1140  DATR2A,80,0 
02, A8, 00, 02 
C,S0,03,FC, 
,02,F8,3F,a. 
AA,A8,AA,AA 

SJ  1150  DATAA8,A8,A, 
00,2B,A8,0'' 
2,A8,00,0A 
,00,2A,AA,a 
0A,AA,0  0,B9 

HA  1160  DATA00,00,Z' 
20, 0B, 00, 00 
A,0e,00,AA, 
,00,08,00,0 
02,8A,28 

HH  1170  DATA02,A8,0 
28,08,20,00 
A,0A,80,0a, 
,2A,00,20,0 
00,00,00,00 


0,00,00,00, 

,00,00,00,0 

00,00,00,00 

0,00 

0,22,A0,00, 

,A8,00.03,F 

00,0B,FE,0F 

A,AA,28,2A, 

A,30,2B,A8, 
,02, A3, 00,0 
AA,00,0A,AA 
0,2A,AA,80, 

0,00,A0,00, 
,08,00,00,2 
80, 00, 2A, 00 
2,00,00,2A, 

B,A0,00,00, 
,28,02,00,2 
0  2,08,00,00 
8,02,00,00, 
,ai,00 


BEFORE  TYPING  .  .  . 
Before  typing  in  programs,  please 
refer  to  "How  to  Type  In 
COMPUTE! 's  Gazette  Programs," 
elsewhere  in  this  issue. 


Monster  Bar-B-Q 

Article  on  page  IS. 

FH    10    REM   COPYRIGHT    1989    COMPU 

TE  !     PUBLICATIONS,     ItJC.    - 
At,L    RIGHTS    RF,SERVED 
FH    20    SCNCLR:COLOR0,1:COLOR4,1 

:SPRCOLOR2,12:VOL3:X=RHD 

{-Tl/101) 
EE    30    PlS  =  ">i»ll#l#":KS=-15O0 
BQ    40    FO[lI=2T08:SPRrTEl  ,0,  ,  1,0 

,0,1.:MOVSPRI  ,0#0:NEXT:SP 

R[TE1,0, 7,0,0, 0,0 
RS  50  DIHMP{14,2)  ,JS{9,3,2)  ,GR 

[7) ,MC(7) ,MNS(7) 
XC  60  GOSUB820:GOSUB1290:GOSLfB 

1B20 
XC  70  DEFFNR(X)=INT (RND (1) *X+1 

) 
DQ  80  MCtl)=4:MC(2)=9!MC[3)=X4 

:MC(4)=3:HC(5)-6:MC(6)=9 

:MC[7}=11 
JR  90  JX=5:JV»3:SC=0:MF=0:MM=0 

:Z=1:C=0:D=0:O=0;T=0 
OD  100  GRAPHIC3:M0VSPR1, JS [JX, 
JY,0)  ,JS(JX,JY,1)  : SPRIT 
E1,1:TIS="000000" 
BE  110  GOSUB  400 
SO  120  IF  MM+HF>=10  THEN  650 
CR  130  GOSUB  580 
KK  140  GOSOB  420 
HM  150  GOTO110 

JR  160  JS=J0Y(2) tONJSGOTO190,2 
00,210,2  20,230,240,250, 
260 
PC  170  IFJS>127THENGOSIIB330 
MS  130  GOTO320 
RE  190  JY=JV-Z:GOTO2  70 
QX  200  JX=JX+Z!JY=JY-Z:GOTO270 
PG  210  JX=JX+Z!GOTO270 
GO  220  JX=JX+Z: JY=JY+Z:GOTO270 
GE  230  JY='JY  +  Z:GOTO270 
QK  240  JX=JX-Z:JY=JY+Z:GOTO270 
FM  250  JX=JX-a;GOTO270 
GF  260  JX=JX-Z: jy=JY-Z 
GX  270  IFJX<1THENJX=9 
CK  280  IFJX>9THENJX=-1 
JM  290  IFJY<1THENJY=1 
FK  300  irJY>3THENJY=3 


MJ  310  HOVSPRl,JS (JX,JY,0) ,JS( 

JX,JY,1) 
XM  320  RETURN  HQ  720 

DJ  330  SPRITE1,0:SOOND1, 30000,   CG  730 

30,l,5000,50a,3;SPRITEl 

XQ  340  IFMP(JS(JX,JY,2) ,2)=0TH   KM  740 

ENMF=MF+1:GOTO3  90         CG  7  50 
CM  350  C=MP(JS {JX,JY,2) ,2) :SC"   MP  760 

SC+1  BK  770 

BE  360  SPRITEC, ,8, ,, ,0:SOUND2, 

60000,10,0,30000,3163,1   QQ  780 
AF  370  FORI=lTO6:MOVSPRC,+0,+4 

*  ME  XT 
JQ  330  MP(GR(C-1) ,2)=0:GRtC-l) 

=0:D=C  QE  790 

PX  390  RETURN 
KF  400  EY  =  FNR  [15)-1:IFEYTHENCH   AP  800 

AR3,6, 1,"WW":ELSBCHAR1, 

6,1,"--"  PF  810 

EX  410  RETURN  SG  820 

PP  420  M=FNR(7)  :IFM  +  l  =  DTHt  1^420 
QB  430  IFFNR(10) >QTHEN560        SA  830 
ER  440  GOSUB160 
OS  450  IFMP{GR(H) ,2)THEN540 
JF  460  G=FNR{14> !IFMP(G,2)THEN 

460 
JX  470  GOSUB160 
MR  480  GRtM)=G:MOVSPRM+l,MP!G, 

0)  ,MP(G,l)+24 
CQ  490  R  =  FNR(7) :SPRSAVMN$(R)  ,M 

+  1:SPRITEM  +  1,1,MC(R)  ,  ,  , 

,1  GR  840 

PS  500  GOSUB160 
GJ  510  HP(G,2)=M+1 
RA  520  S0tJND2, 3000, 12, 0,500, 20 

0,0:FORI=1TO12!MOVSPR[H- 

l,+0,-2;NEXT 
OH  530  GOTOS60 
ME  540  S0UND2, 3000, 12, 1,500, 20 

0,0:FORI=1TO12:MOVSPRM+ 

l,+0,+2:NEXT  QH  850 

DC  550  MP(GR(M) ,2)=0jGR(M)=0:M 

M=MM+1 
AF  560  GOSUB160 
JM  570  RETURN 
QG  580  IFTKTTHEN630 
MM  590  T=T+3900:Q-O+2: IFQ>10TH    BD  860 

EN640 
HC  600  VOL0:SOIIND1,175,250,2,1    RA  870 

00,3,3 
DB  610  COLOR2,2:FORJ=1T02:FORI 

=1T05:V0LI*2:DRAWZ,83,6    FJ  880 

TO72,56:COLOR0,4:DRAW1, 

8  3,6TO7  2,56sCOLOR0, 1 : NE 

XT:SLEEP1:NEXT:V0L3 
FD  620  IFQ<11THENS0UND3, 37000,    MX  890 

3750,2,24  0  00,400  0,2,408 

0 
DR  630  RETURN 

HE  640  FORK=1TO2:GOSUB600:NEXT 
FB  650  FORI=lT0e:SPRITEt ,0:NEX 

T:GRAPHIC0 
FK  660  WIND0W3,14,33,18,1:WIND   FJ  900 

0W5,14,37,19,1 
PF  670  PRINT" tGRN}MONSTERS 

{2  SPaCES)<6>"; :PRINT  U 

SING  P1S;SC; :PRINT" 

{GRN)  *  100  ={RED)";SC* 

100 
QM  630  PRINT"{GRN}MISFIRES 

{2    SPACES)<6>"; tPRINT  U    PG  910 

SING  P1$;MF; :PRINT" 

fGRN)  *U  SPACES)50  = 

(RED)";MF*-50 
KE  590  PRINT"{GRN!SURV1V0RS 

(6>";:PRINT  USING  P1S;M 

M; sPRINT"{GRN(  *  150  = 

{SPACE} (RED}"rMM*-150      BA  920 
MS  700  PRIMT"{5K25  SPACES} 

{6  Y>" 
SQ  710  SC=SC*100-MF*50-MM*150: 

PRINT "{CYN}T0TAL  SCORE; 


fll  SPACES5";!PRINT  USI 

NG  PlSjSC 

IFSC>HSTHENHS=SC 

PRINT"{CYN}HIGH  SCORE: 

[12  SPACES)"; SPRINT  USI 

NG  P1S;HS; 

PRINT" {2  HOME)"; 

K5  =  "" 

DO:GETK$ 

CHAR,14,20,"<1>PLAV  AGA 

IN  ?" 

IFKS="Y"THENWIND0WS,14, 

37,20,1;PRINT'M2  CLR)": 

GOSUBl3  20:3OUND3,0,0:GO 

TO70 

IFK5="N"THEN  PRINT" 

(CLR)*':SOUND  3,0,0:EXIT 

CHAR, 14,20, "{YEL} PLAY  A 

GAIN  ?" 

L00P:END 

S0UND3, 37000, 950, 2, 2400 

0,4000,2,4070 

CHAR,4,0,"{5}<*^{8>E 

{5}-{*J{8>E{RVS){5}'    <a> 

<5H2    SPACES}<a> 
{2    SPACES}{5}    ^a>    <5} 
{2    SPACES} {8J{ 2    SPACES} 

(5>{2    SPACES)<8> 
[2    SPACES}(5}    i%}    <5> 
(2    SPACESlt8>{2    SPACES) 
t5>    <8>     10FF)t5}(*>{8> 

£{5><*>{8>£" 

CHAR,8,I,"f5}{*><8>£ 
{RVS}<5>(2    SPACES}i8> 
{2    SPACES}  [OFF)  <5H*> 
(8}Ei5>{*>(RVS)     i8J 
{0FF}£t5J{*y{RVS)    in 
{SPACE}{OFF)ei5H*){8y 
E{RVS}<5>{2    SPACES}(8> 

T2    SPACES) (0FF}<5>i*> 

tB>E" 

CHAR,10,2,"<5J(*>{RVS} 

[SPACE)<a>    {OFF)£ 

[3    SPACES}<5>{*H3}£ 

{2    SPACES}<5H*>{8}£ 

(3    SPACES){5K*HRVS} 

<8>     (0FF)£" 

CHAR,ll,3,"<5>{*}-ie>E 

{14    SPACES)t5}{*K8>E" 

CHAR,13,21,"{RVS}{5}£ 

{8>{*>[0FF) (10    SPACES} 

{RVS){5}£t8><*r' 

CHAR,12,22,"{RVS){5>E 

{SPACE}<B>    i*KOFF} 

f8  SPACES} [RVS]{5>£ 

t8»  <*>" 

CHAR,lB,23,"(RVS)i5>£ 

<8>t*>{5K2    SPACES]<8> 

(2    SPACES){5fE{8>-t*y 

^5}£<8>f*><5}E{8^t*> 

i5>£'t8>{*>'C5} 

[2    SPACES}{aj(2    SPACES) 

t5JE-E3><n" 

CHAR,6,24,"{RVS}{5>£ 
t8K*I><5>E{8H*H5} 

{8>    {5H2    SPACES}{a> 
{2    SPACES)<5>    i8>    <5> 
<a>    <5J    -t8>    i5}    (8}    (5> 
{2    SPACES}{8H2    SPACES} 
<S>    {8}    E{a>i*H5}£ 
<8>(*>{H0ME)" 
CHAR,3,5,"[BLU) {RVS j 
{*>£    {RIGHT)£ 
(2    SPACES}{*>[RIGHT} 
[2    SPACES};*}     (RIGHT}£ 

(2  spacesH*Hright} 
[4  spaces) {right}   (3  e> 

(RIGHT)  {F>  ^*r' 
CHAR,3,6,"<7>{4  SPACES} 
[right)  {L^tJ}  {RIGHT} 
[4  SPACES){RIGHT) {OFF} 
t*>{RVS)[2  SPACES} t*J 
{2  RIGHT){2  SPACES) 
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U    R1GHTH3   SPftCES) 
{2    RIGHT)     {VJ    fOFF)E" 
MP    930   CHAR,3,7,"(CYM}{RVST 

{OFF){*>£{RVS}     {RIGHT) 

{off}{*}TrvsH2  spaces) 

{0FF)£{RIGHT) {RVS) 

{off)(*Krvs}{2  spaces) 

{RIGHT)(OFF)i*J{RVS) 
{2  SPftCES] (OFF)E 
(2  RIGHT)(RVS) 
t2  SPACESJ{2  RIGHT) 
i2    TH  RIGHT)  {OFF}<*> 
(RVS) {2  SPACES)" 
GB  940  CHAR,3,9,"<3}{RVSl  <D> 
{SPACE}(*>{2  RIGHT)£ 
{*>(2  RIGHT) {3  SPACES) 
{*>(6  RIGHT)  <Dy  i*} 
{6  RrGHT)£(2  SPACES) 

GA  950  CHAR, 3, 10, "(IJ  (CJ 
(OFF)£tRIGHT) (RVS)£ 
{2  SPACES)<*>{RIGHT} 
tLXJ}  [RIGHT)  (OFF) 
t4  OUrIGHT)  {RVS}  {C> 
{0FF)£{RIGHT)<4  0} 
{RIGHT} (RVS)  tD><F>  " 

FP  960  CHAR, 3, 11, "{RED)  iD^ 
{•>( RIGHT)  <C><V} 
(RIGHT) (3  SPACES) {OFF} 
e  (RIGHT  )i4  UK  RIGHT) 
Trvs)  <D>  (*>{RIGHT) 
(OFF) {4  UH RIGHT) (RVS) 
{SPACE){C>  <D>" 

BF  970  CHAR, 3, 12, "^2}  <C} 

{0FF)£{RIGHT} (RVS)  <D} 
{Fj  {RIGHT)  <L>(OFF)i*}- 
tRVS)  {6  RIGHT)  iC} 
{0FF)£(6  RIGHTJi*}- 
{RVS)  <D>  " 

FE  980  CHAR,12,15,"{OFF}i7}COP 
YRIGHT  1989" 

RM  990  CHAR,6,16,"{OFF}{7}COMP 
UTE!  PUBLICATIONS,  INC. 

(I 

FG  10S0  CHAn,10, 17,"{OFF)i7>AL 

L  RIGHTS  RESERVED" 
DS  1310  RETURN 
AK  1020  FAST:GRAPHIC3,1 
AJ  1930  COr,ORl,12:COLOR2,l3:CO 

L0R3, 16:WIDTH1 
DD  1340  CIRCLE2,6,6,6,6:PAINT2 

,6,6 
JH  1050  BOX2,0,6, 12,24,  ,  1 
FE  1060  CIRCt,E3,10,6,6,6:PAINT 

3,10,6 
SX    1070    80X3,4,6,16,24,  ,1 
HG    1080    DRAW2,6,12T06,6t08,6TO 

8,9T07,9T07, 10TOB,12 
EP    1090    DRfiW2,10,6TO10, 12:DRAW 

2, 12, 12T012,6T014,6T01 

4,9T013,9 
KF    1100    SSHftPETS, 0,0, 16,24 
SG    1110    60X0,0,0,16,24,  ,1 
EX    1120    FORY=104TO168STEP54:FO 

RX=9t0136STEP32:GSHAPE 

TS,X,Y:NEXTX,Y 
QQ    1130    FORX=24TOl20STEP32:GSH 

APETS,X,136:NEXT 
RB    1140    FORX=0TO39:FORY=0TO7:C 

HAR1,X,Y,"    ",1:NEXTY,X 
MD    1150    DRAW0,6,0TO8, 36T020,38 

TO2  0,24TO24,16TO24,8TO 

22,8T02  4,6T02  5,8T0  2  8,7 

T0  31,BT0  32,4T0  34,8T0  32 

,8TO32,16TO3  4,24TO3  0,3 

8 
BM    1160    DRAW0, 30, 38T044, 407048 

,32T04e,24T048, 3  2T056, 

2  4TO4a,3  3TO43,41TO60,3 

8T0  52 , 39T056 , 47T032 ,39 

T028,43 
SJ  1170  DRfiW0,28,43TO27,51TO24 

, 51TO20,4  4TO12,46TO9,5 


aTO10,64:PAINT0,0,0;DR 
AW0,24,7!DRAWa,32,7TO3 
3,7 

EQ  1180  COLOR3,8:CHAR3,6,l,"WW 
" : DRAW2 ,28,16T0  26,1 8T0 
26,20TO28,19:COLOR3,12 
:WIDTH2:ORAW3,24,38T02 
5,4  0:DRAW3,2B,38TO29,4 
0:DRAW1, 11, 64X012,80 

PQ  1190  DRftW0,12,64TO28,62TO32 
,6  3TO36,61TO40,60TO56, 
62TO60,64TO88,56TO12  4, 
56TO132,60TO15  2,64:PAI 
NT 0,8 9, 57: PA INT a, 56, 6 3 
!PAINT0,29,63;CHAR1,37 

PX  12  03  CHAR1,2  4,1,"£  {*}-":CH 
AR1,24,2,"(J>  (LJ":CHA 
HI, 28, 2, "<!,>" 

SD  1210  CHAR1,23, 3 , "£ 

(5  SPACES){*>":CHAR1,2 
3,4,"{JJ(5  SPACES}{L>" 
:CHAR1,22,5,"E 
{7  SPACES)i*}" 

DR  1220  CHAR1,23,6,"(7  SPACES) 
":CHAR1,22,6,"-",1:CHA 
Rl,30,6,"-",1 

JJ  1230  COLOR3,8:CHAR3,25,2,"+ 
",l:CHAR3,24,6,"+",l!C 
HAR3,26,6,"+",1:CHAR3, 
28, 4, "+",1 

PH  1240  WIDTHl:DRAWa,160,48TOl 
52,48TO160,49:DRAWa,16 
0,2  6TO14  4 , 25T0136 , 16T0 
14  4,2STO144,16T0i44,2  5 
TO160,30:PAINT0,159,27 

KE  1250  RESTORE1270:DO:READCS! 
IFCS="*"THENEXIT 

FJ  1260  READX, Y!CHAR1,X,Y,CS,1 
:LOOP 

KQ    1270    DATA"{BJ",ia,3,"fB}{Dy 
(B3-",12,2,"<B>M5,4," 
(B}",15,5,"<B>",13,6," 
(B)-",35,0,"<B}    tV3-(F> 
{SPACE)<V>",33,1,"{V> 
tB}-",32,2,"tBHCr',37, 
2,"tB><V}",33,3,"{C} 
(DK2   V>(2    spacesXbK' 
,32,4,"iC>    iBHD}",34, 
5,"fV5--[B>fD3.",35,6," 
i2   V}{C>",36,7,* 

BS    1280    SLOW: RETURN 

BK    1290    RESTORE1450 

GB    1300   FORI='3584TO4095:REftDJ: 
X1=X1+J:P0KEI,J:NEXT: I 
FX10  56999THENPRINT" 
(CLRjERROR    IN    SPRITE    D 
ATA."!STOP 

BC  1310  F0RI-1T07:SPRSAVI+1,MM 
S{I) :NEXT 

CG    1320   A=1:Y=132 

XX  1330  D0WHILEY<:197:IFY  =  164TH 
ENX=78;ELSEX=46 

PB  1340  DOWHILEX<:3a3:MP[A,0)  =X 
:MP(A,1) =Y:MP(A,2)=0 

EB  1350  A=A+1:X=X+64:LOOP:Y=Y+ 
32: LOOP 

PS  1360  y=132:FORJ=lT03sX=46:F 
0RI=1T09 

RB  1370  JS (I,J,0)=X:JS(I,J,1)= 
Y:JS  [I,J,2)=0 

FR  1380  X=X+32:NEXT:Y=Y+32:NEX 
T 

HR    1390    I=1:J=1:X=1: Y=-1:D0 

CR  1400  IFYTHENJS  (I,J,2)=X:X='X 
+  1 

MX  1410  I=I+l;IFI>9THENI=l:J=J 
+  1 

GE    1420    Y=NOT  (Y)  :L0OPUNTILX>14 

OX  1430  F0RI=1T07:GR(I) =0:NEXT 
: RETURN 

BA    1440    REM    SPRITE    DATA 

SB  1450  DATA  ,,,,,,,,,,,,,24,, 


,255, ,1,153, 128, 3, 24,1 
92,6, ,96,6, ,96, 31, 153 
KB  1460  DATA  248 , 6, , 96 , 6, , 96 , 3 
,24, 192, 1,153, 128, ,255 

CM  1470  DATA  ,255, ,15,255,240, 
63,126,252,61,86,188,5 
3,85,172,53,85,172,191 
,86,254,187,219,238,18 
6,154,174,152,24,42,15 
4,154 

XG  1480  DATA  170,149,89,106,16 
5,154,106,166,170,170, 
36,85,40,232,65,43,243 
,,47,248,65,47,250,170 
,175,62,170,188,255,17 
0,255,0 

KB  1490  DATA  2,171,192,10,170, 
240,42,170,188,42,170, 
188,171,170,255,170,23 
5,255,168,44,63,168,10 
9,63, 17a, 171, 255, 234,1 
31,255,42,171 

BA  1500  DATA  252,42,151,252,42 
,65,252,40,65,60,56,13 
0,60,8, ,48,10,65,240,1 
0,151,240,10,175,240,4 
2,191,252,170,175,175, 
0 

KR  1510  DATA  15,255,240,62,255 
,252,58,239,188,10,171 
,172,10,170,172,10,170 
,172,15,239,232,4,100, 
104,15,239,232,15,171, 
232,10,238 

KJ  1520  DATA  172,10,170,160,10 
,170, 160, ,2, 163,42, 168 
, 175,42,170,163, 10,170 
,  176,58,170,252, 250,17 
1,255,254, 175,255,255, 
255,255,0 

HG  1530  DATA  10,170, ,42,170, 12 
8,163,42,32,184,8,32,1 
72,73,32,184,8,32,170, 
170,168,170,174, 168,23 
8,175,160, 35,170,160,4 
0,68 

DH  1540  DATA  64,56,136,128,10, 
34,32,14,17,16,2,170,1 
68, 3, 170, 168, ,44, ,,171 
,,,44, ,44,171,56,170,1 
70,170,0 

KX  1550  DATA  ,44,  ,  ,44, , ,239, ,3 
,174,192,14,174,176,10 
,170,160,15,170,240,53 
,235,252,41,255,104,41 
,20, ia4,45,85 

JR  1560  DATA  120,239,235,251,1 
75,170,250,238,170,187 
,170,255,170,235, ,235, 
168, ,42,46,170,184,234 
,170,171,170,170,170,1 
70,170,170,0 

CM  1570  DATA  ,215,192,3,95,80, 
4,255,240,13,53,92,19, 
213,84,55,95,244,61,12 
0,128,21,202,140,31, ,2 
44,60,63,92,5,245 

JX  1580  DATA  112,29,95,244,31, 
255,92,7,213,204,13,25 
5,208,3,127,112,3,212, 
,  ,255,1,124,192,7,23,2 
08,85,223,93,0 

XX  1590  DATA  64  ,  255 , 1 ,  147 , , 198 
,22, ,148,58,130,172,10 
,170,160, ,170, ,143,40, 
243, 164, 239, 31, 172, ia9 
,63,171,239,255,234,17 
4 

DM  1600  DATA  191,42,174,138,58 
,174,188,10, ,176,8,40, 
48,8,85,48,10,171,240, 
8,131,48,10, ,240,42,13 
1,252, 170,175,175,0 
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1581  Directory  Sorter 

Article  on  page  48. 

BH  10  REM  COPYRIGHT  1989  COMPU 
TR!  PUBLICATIOHS,  INC.  - 
-  ALL  RIGHTS  RESERVED 

BR  20  DIM  ZS(297) ,SG$(297) !V=0 
:D"1:MB=4:ME=16:QS=CHRS ( 

34) 
ED  30  POKES328fl,0:POKES3281,a: 
PRINT'MGRN}"; :0$="":FORfi 
=  ITO30:O5=O54-CHRS  (fl)  ;NEX 
TA 
KR  40  WD=20;IFFHE(B) =FRE<1)THE 

NOM=3:G0TO6a 
GM  59  IF(PEEK(215)AHD128)THENO 

M="l:WD  =  40:ELSEOM  =  2 
FM  60  PRINT"(CLR) {N) {YEL) 

{4  D0WH)"TAB(WD-2) "1581" 
jPRINTTAB (WD-8) "DIRECTOR 
Y  SORTER" 
PP  70  PRINT"{7H4  D0WN}"TAB(WD 

-7) "COPYRIGHT  19S9" 
CQ  80  PRINTTftB (WD-13) "COHPUTEl 

PUBLICATIONS,  l^NC .  " 
KP  90  PRINTTABtWD-9) "ALL  RIGHT 

S  RESERVED" 
CA  100  PRINT"{HOME) (17  DOWH} 
{ YELl "TAB (WD-12 ) "DRIVE 
isPACE}NUMBER  t0=QOIT) 
{2  SPACES}8{2  SPACES) 
is  LEFT}"; 
SR  110  INPUTDV$:DV=VAL(DV$) !IF 

DV=0THENEHD 
SK  120  IFDV<8ORDV>30THENPRINTT 
AB(WD-ll) "(DOWN) tHHT) 
{RVSH2  SPACES}  I^NVAL ID 
{SPACE}DRIVE  NO. 
{2  SPACES) ":GOTOia0 
HR  130  IFOM=3THENPOKE780,DV 
CC  140  IF0M<3THENP0KE6,DV 
AE  150  POKE144,-0:SYS65457:TS  =  S 

T;SYS65454:TS=TS0RST 
DR  160  IFTSTHENPRINTTAB(WD-II) 
"{DOWN} {WHT} (RVS) 
{2  SPACES}DEVICE  NOT  PR 
ESENT  ":GOTO100   ~ 
DR  170  0PEN15,DV, 15, "Ul": INPUT 
il5,AS,BS,CS,DS:CLOSE15 
XG  180  IFRIGHTS (BS,2) <>"ai"THE 
NPRINTTAB(WD-ll) "{DOWN} 
{VTHT)  (HVS}DEVICE"DV" 
{LEFT)  ISH'T  AH  81";G0T 
0100 
PB  190  PRIMT"{CLR) {5  DOWN} "TAB 
tWD-15} " 


DA  200  PRINT" {DOWN} "TAB (WD-11) 
"PRESS  (WHT}{RVS)  A 
{0FF){YEL}  for  A-Z  SORT 

EX  210  PRIfST"{DOWN}"TAB  (WD-11) 
"PRESS  tWHT}{RVS]  Z 
(OFF) {YEL)  FOR  Z-A  SORT 

CQ    2  20  PRINT" (DOWN} "TAB (WD-13) 
"PRESS  (WHT}{RVS)  M 
{OFF}{yEL)  FOR  MANUAL  S 
ORT  .  " 

XR  230  PRINT" (D0WN)"TAB(WD-15) 


RG  240  GETSO$!lFSO$<>"A"ANDSOS 


<>"M"ANDSOS<>"Z"THEN24a 
MX  250  IF0M=2THEHPRINT" 

(3  DOWN) {WHT)"TAB(WD-14 

! "SCREEN  WILL  BLANK  DUR 

ING  L0AD{YEL}":SLEEP1:F 

AST 
EH  260  PRINT" {CLR){ 18  DOWN)SCA 

NNING"; 
BF  270  OPENI5,DV,15,"I0":OPEN5 

,DV,5,"I":S=3 
GG  2B0  PRINT#15,"U1:";5;0;40;S 

:GET*5,TS,SS:S=ASC(S$+C 

HRS{0)) 
AX  290  A$="":L=2:FORE-0TO29:GE 

Ti5,BS:A$=AS+CHRS(ASC(B 

S  +  CHRS  (0}) )  !NEXTE:G0SUB 

560 
QA  300  GETt5,BS,BS;F0RRA-lT06; 

AS-"" 
RR  310  FORE=aT029:GET#5,BS:AS= 

AS+CHRS(flSC(BS+CHRS(0) ) 

) :NEXTE!GOSUB560 
DS    320    GET#5,BS,BS:NEXTRA;A$=" 

It 

FQ  330  FORE=aT029:GETI5,BS:A$= 

AS+CHR5(ASC(BStCHRS(0) ) 

) :NEXTE:GOSUB560 
GE  340  IFASC(T$+CHR$(0) ) =40THE 

N280 
KF  350  PRINT:PRINT|15,"U1:";S; 

0;4a,-0:GET#5,AS,AS,AS,A 

S!H5""'';F0RZ  =  1T016!GETI 

5,A$ 
AP  360  H5=H$+A$:NEXT:CLOSE5:CL 

0SE15: IF0M=2THENSLOW 
KB  370  GOSUB660:PRINT"{CLR) 

{YEL}SAVE  THIS  NEW  DIRE 

CTORY?  "; 
CP  380  GETA5: IFA$<>"Y"ANDAS<>" 

N"THEN380 
DE  390  PRINTAS:IFAS="N"THEN52a 
BE  400  IF0M-2THENPRINT" 

{3  DOWN) {WHT) "TAB (WD-14 

) "£CREEN  WILL  BLANK  DUR 

ING  SAVE{YEL}":SLEEP1:F 

AST 
BS  410  CLOSE  15:OPEN15,DV,15," 

I0":OPEN5,DV,5/"#":S=3 
RB  420  IF8* (V/8) >INT (V/8) *8THE 

NV=INT ( (V/8)+l)*B 
XC  4  30  HS="":FORB=3TOV/8+2:AKS 

2  II  » 

FH  440  PRINT#15,"B-P:";5;0:IFB 

<V/8+2THENPRINT#5,CHR$( 

40)+CHR$[B+l) ; 
MR  450  IFB=V/8+2THENPRINTI5,CH 

RS(0)+CHRS(255) ; 
MH  460  FORZ"1TO30:PRINT|5,CHRS 
(ASC(MIDS (Z$(l+  (B-3)*0) 

,Z,1)+CHRS(9) ) ) ; :NEXT3 
HP  470  FORG=2T08:PRINT#5,CHRS( 

0)  +CHRSO)  ;  :FORZ=1TO30 
DD  480  PRINTII5,CHRS(ASC(MI0S(Z 

S(G+(B-3) *8) ,Z,l}+CHHS( 

0) ) ) ; :NEXTZ,G 
GC  490  PRiNTn5,"U2:";5;a;4t);n 

:NEXTB 
AG  500  CLOSE5:CLOSE15;IFOM=2TH 

ENS LOW 

hm  510  print"{clr){2  down) 

{yel}collecting  disk,,. 

{D0WHT":0PRN15,DV,15,"V 

0:":CLOSE15 
RD  52  0  PRINT" {DOWN) DO  YOU  WANT 

TO  TRY  ANOTHER?  "j 
JR  530  GETAS; rFAS<>"Y"ANDA5<>" 

N"THEN533 
CX  54B  PRINTAS:IFAS="Y"THENCLR 

:G0T0  2B 
A J  5  50  END 

KC  560  IFAS'OSTHEHRETURN 
MS  570  IFSO$""M"ANDV<>0THEN630 


BG  580  IFV<>OTHENFORB=1TOV 

FR  S9a  IFSOS="Z"THEN620 

MJ  600  IFV<>0THENIFMID$(AS,4,1 

6)>MIDS(Z$(B) ,4,16)THEN 

NEXTB 
CM  610  GOTO630 
EM  620  IFV<>0THENIFMIDS(A$,4,1 

6)<MI05(Z5(B) ,4,16)THEN 

NEXTB 
RQ  630  PRINT"."? :FORC"V+1TOBST 

EP-1;ZS(C)=Z5(C-1) :NEXT 

C:ZS(B)=AS: IFV<296THENV 

=V  +  1 
FH  640  IFV<296ANDSO$="M"THENB» 

B+1 
PX  650  RETURN 
PB  660  K=l!CC$="{WHT)" 
XR  670  JJ=96:IFOM>lTHENJJ-48 
FE  660  IFV-K<JJTHEHJJ-V-K+1 
QS  690  IFG=0THENO=0 
XP  700  PRIHT"(CLR) (YEL)"; :A=1 
KQ  710  IFA<25THENCL=0:GOTO760 
BK  720  IFA>72ANDA<97THENCL=60: 

GOTO750 
QA  730  IFA>4aANDA<73THENCL»40: 

GOTO750 
HG  740  IFA>24ANOA<49THENCL=20 
HJ  750  IFA-250RA='490RA»73THENP 

RIHT"(HOME}"; 
BS  760  MB=4:ME=16:IFAS<>"GB"TH 

EN810 
MP  770  IF(A+K-1)>=GSAND(A+K-1) 

<=GFTHEN790 
EH  780  GOTO810 
GH  790  PRINTTAB{CL)CCS"(RVS)"Q 

SMID$(Z5 (A+K-1) ,MB,ME}Q 

S"(OFF) (YEL)" 
PG  800  GOTO830 
BK  810  PRINTTAB(CL)Q$MIDS(Z$(A 

+K-1) ,MB,ME)QS"{YEL)" 
AJ  820  IFAS="GB"THEN830 
RX  830  IFA<=(JJ-1)THENA=A+1:G0 

TO710 
GA  840  IFAS>""GB"THEN1410 
KF  850  IFG<>2THENPRINT"{H0ME} 

(YEL) (RVS)"CCSQSMID$(ZS 
(K+0) ,MB,ME)Q$"{OFF)"; 
CG  860  IFG=2ANDK+0=>GSTHENPRIN 

T"(HOME}{RVS}<B>"QSMIDS 
(ZS  (K+0)  ,HB,ME)QS"{OFF) 

II . 

GB  870  IFG=2ANDK+0<GSTHENPRINT 

"{HOME} (YEL) {RVS]"CC$QS 

MIDS(ZS(K+0) ,MB,ME)Q$" 

{OFF}"; 
BG  880  IFG»1AND{AS»"PS"0RAS-"G 

B")THENGOSUB1620:IFG<>2 

THEN880 
JM  890  GETAS:IFA$-""THEN890 
DB  900  IFG=2ANDAS="{D0WN}"ANDK 

+O=(V-GT)+1THEN890 
QQ  910  IF0=JJ-1AHDA$="{D0WN}"T 

HENa9B 
DQ  920  IFO=0ANDAS="{UP}"THENe9 

0 
BK  930  IFAS="(DOWN}"THENG03U81 

410:RV-1:O-O41.:GOSUB141 

0:GOTO8  90 
PC  940  1FA$-"(UP)"THENG0SUB  14 

10;RV=1:O=O-1:GOSUB1410 

:GOTOa90 
FR  950  IFA$-"-"AND0M>lANDK-4a> 

«lTHENK"K-4a:O=0:GOTO67 

0 
JR  960  IFAS="-"ANDOM=lANDK-96> 

=1THENK=K-96:0=S:GOT067 

a 

HR  970  IFA9  =  "  +  "AND0M>1ANDK  +  4B<: 
VTHENK=K+4B:O=0:GOTO670 

AM  980  IFAS="+"AND0M=1ANDK+96< 
VTHENK=-K  +  9e:0  =  a:GOT067a 

DJ  990  IFA<=JJ-lTHENA-A+lfG0T0 
710 
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OC  1000  ifas»'Mright}"ando<jj- 

Z4THENGOSUB132aiRV="l:0 

=O  +  2'1:GOSUB13  20:GOTO89 

0 
CD    101B    IFA$="(LEFT3"ANDO>23TH 

ENGOSUB1320:RV=l:O=O-2 

4:G0SUB  1320:GOTO890 
GA  1020  IFA5="|"THENGOSUB1320: 

RV=1:GOSUB13  20:GOTO890 
SF  1030  rFAS=CHRS(222)THEHGOSU 

B1320:RV=l!GO3OQ  1320: 

GOT089a 
GC  1040  IFA$="{H0ME)"THENGOSUB 
141.0:RV  =  l:O  =  a:GOSUB14 

10:GOTO890 
Jfi  1050  IFA5="G"ANDG=2fiNDK+0<= 

V-GT+lTHENie40 
PE  1060  IFAS="G"AHDG=0THENG=1: 

GOTO1610 
OC  1070  IFA$="PS"ANDG>0THEN688 
PJ  10B0  IFAS  =  "G"ANE)G  =  lTHBNG'-2! 

O=0:CCS="(6}":GOTO670 
KB  1090  IFA$="F"ANDG=2THENG0SU 

B1160 
SH  1100  IFAS="PS"AND(G=0ORG"2) 

THEN670 
JD  1110  IFAS="C"ANDG=2THEN1830 
SD  1120  IFA$="Q"ANDG=0THENRnTU 

RN 
RJ  1130  GOTO890 
QB  1140  GETA$: IFAS<>"Y"ANDAS<> 

"N"THEH1140 
KS  1150  CLOSB5:CLOSE15:END 
KF  1160  Z=0:GE=rNT tGT/10)+l 
SK  1170  B=3:FORGP=1TOGE 
KM  1180  PRINT" tCLR)" 
SR  1190  PRINT"(YEL}(CLR) 

[2    DOWN) "TAB [WD-10) "FI 

LE{S)     FOR    PLACEMENT" 
GE    1200    PRINTTAB(WD-10}"(21   T> 

HM   1210    PRINTTAB(WD-15) "DIR   LO 

CT{9    SPACES)FILE    NAME" 
JG    1220    PRINTTAB (WD-15) "{a    T> 

O    SPACESK9    T>t3}" 
MK    1230    B  =  B  +  1:IFB  =  110RSGS  (2)  =  " 

"THEMB=0:GOTO1260 
CA    1240    IFSGS  (Z) <>""THENPRINTT 

AB (WD-14 ) "<a>"GS+ZTAB ( 

WD-2) "{3>"QSMID$(SGS(Z 

) ,4,16)0$ 
FP  1250  Z=Z+1:1F2<=GTTHEN1230 
HR  1260  PRrNT"(D0WN}{8J"TAB(WD 

-8) "GROUP  TOTAL=";GT 
MD  12  70  PRINT" (DOWN) {WHT) "TAB ( 

WD-10) "PRESS  {RVS)  E 

{OFF}    END    DISPLAY" 
KE    1280    PRINT"TdOWN1"TAB(WD-12 

) "PRESS    RETURN    TO    CONT 

INUE(3}" 
BA    1290    GETRIS: IFR1S<>CHR$(13) 

ANDR1S<>"E"THEN1290 
MM    1300    IFR1S='CHR$(13)  ANDSG$(Z 

)<>""THENNEXTGP 
BD    1310   Z=0;GP-0:GE-0:AS="PS": 

O=0:RETURN 
QQ    1320   CR=0:CD=0!CP=0 
KF    1330    IFAS="T"ANDRV=1AND0<24 

THENO=0 
CP    1340    IFA$  =  "'f"ANDRV=lANDO<48 

ANDO24THEN0-24 
PC    1350    IFA$="T"ANDRV=1AND0<72 

AND0>48THEN0=48 
JG    1360    IFA5="T"ANDRV=1AND0<96 

AND0>72THEN0=72 
GG    1370    IFA$=CHR$(222) ANDRV-IA 

NDO<24THENO=23 
BS    1380    IFAS^CHRS (222) ANDRV^IA 

NDO<4aANDO>23THENO=4  7 
HS    1390    IFAS=CHR5 (222) ANDRV=1A 

NDO<7  2ANDO>4  7THEHO=71 
AD    1400    IFAS=CHR$(222)ANDRV"1A 

NDO<96ANDO>71THENO-95 
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AG    1410    IF0>JJ-1THEN0=JJ-1 

KG    1420    CR-0:CD=0:CP-=0 

PX  1430  IF0<24THENCr)=O:G0TO153 

0 
KE  1440  IFO>23ANDO<48THENCR»20 

: GOTO 14 80 
JS  1450  IFOMO1THEN14S0 
SH  1460  IFO>47ANDO<72ANDOM=lTH 

ENCR=40:GOTO1480 
EQ  1470  IFO>71ANDO<:96ANDOM  =  lTH 

ENCR=60 
AM  14B0  IFO>=72THENCDsO-72!GOT 

01510 
DX  1490  IFO>=48THENCD«0-48!GOT 

01520 
GH  1500  IFO>=25THENCD=0-24 
HG  1510  IFO>95ANDOM"lTHENO=9S: 

RETURN 
SP  1520  IF0M>1AND0>47THEH0=47: 

RETURN 
BB  1530  PRINT"{H0ME)"; ;IFCD=0T 

HSN1550 
QQ  1540  FORCP=0TOCD-1:PRINT" 

{DOWN}"; :NEXTCP 
XC  1550  IFCR>0THENPRINTTAB(CR) 
RC  1560  IFG=2ANDR7=1ANDK+0=>GS 

THENPRINT"[RVS}(8>"QSM 

ID$(ZS  [K+O)  ,MB,ME)Q5" 

{OFF)": GOTO 15 90 
GM  1570  1FRV=1THENPBINT"(RVS}" 

CCSQ5MID$(Z$(K+0) ,MB,M 

E)QS"{OFF)"; :GOTO1590 
JE  1580  PRINT" fYEL)"Q5MlD$(Z$( 

K+0) ,MB,ME)QS; 
GF  1590  IFG=1THENRETURN 
CF  1600  RV=0;RETURN 
HF  1610  CC$-"'t3>":GS"K+0:GF=<GS 

;RV-1:GOSUB1410 
JQ  1620  GETDG$:IFDG$=""THEN162 

0 
KD  1630  IFK+0=GSANDDG$="{UP}"T 

HEN1620 
GQ  1640  IFO=0ANDDG$="{UP)"ANDG 

S<K+OTHEN1670 
QK  1650  IFDGS="[UP}"THENRV=0:G 

0SUBl4ia:RV-l:0=0-l:GF 

=K+O:GOSUB1410:GOTO162 

0 
RE  1660  GOTO1690 
RR  1670  IFOM>1THENK=K-48:0=47: 

AS="GB":GOSUB670:A$="" 
DE  1680  IFOM=lTHENK=K-96:0=95! 

A$="GB":GOSUB  670:A$=" 

QM  1690  IFK+0=VANDDGS="{DOWN)" 

THEN1620 
MK    1700    IFOGS="{DOWN}"AND0<JJ- 

lTnEN1730 
JG    1710    IFDGS="{DOWN)"ANDOM>1T 

HENK=K+4B:O=0:A$="PS": 

GOTO1070 
KD  1720  IFDG$="{D0WN)"AND0M=1T 

HENK=K+9  6:O=0:AS="PS": 

GnTO1070 
QE  1730  IFDGS="(DOWN)"THENO=0+ 

1;GF«K+O:GOSUB1410 
HA  1740  IFDG$="G"THEN1780 
QS  1750  IFDGS<>"C"THEN1620 
PG  1760  PRINT"{CLR) [4  DOWH)"TA 

B(WD-16)"{YEL)FILE  GRO 

UP    CANCELED. . .PLEASE    W 

AIT" 
KR    1770    FORCA=0TO297:SGS(CA) =" 

":NEXTCA:RV=0:G=0;GS-0 

:A$="PS":CC$="{WHT)":G 

OTOU00 
BS    1780    PRINT"{CLR} {4    DOWN)"TA 

a(WD-l4) "(yel)moving  f 

ILES  UP... PLEASE  WAIT" 
GB  1790  A=0:FORGA=GSTOGF:SG$(A 

) =Z$(GA) :A=A+1:NEXTGA: 

GA=0:A=0 
SM  1800  GT=GF-GS+1:FORMF=0TOV- 


GF:Z${GS+MF)"ZS(GF+MF+ 
1) :NEXTMF 
FX  1810  F0RFL=VT0V-(GT-1)STEP- 
1:ZS(FL)="{3  SPACES) 

ioy  **************  iwy 

{14    SPACES)" :NEXTFL 
CB    1820    FL=0:RV=0:O=0:CCS="{6} 

";  IFG=1THENG=>2  !GOTO670 
SB    1830    IP=GS:PRINT"{CLR) 

(4    DOWN} "TAB (WD-16) " 

{YELlFILE  GROUP  CANCEL 

EO PLEASE  WAIT":G0TO 

1850 
RG  1840  PRINT"{CLR}{4  DOWN}"TA 

B(WD-14)  "(YEL)J_NSERTIN 

G  FILES. . .PLEASE  WAIT" 

:IP=K+0 
QB  1B50  FORNF-0TOV~(IP+(GT-1) ) 

! Z$ (V-MF) "ZS (V-GT-MF) : 

NEXTMF 
HF  1860  FORTF=0TOGT-1:ZS(IP+TF 

)=SGS(TF) :NEXTTF:F0REG 

=0TO297:SGS(EG)="":NEX 

TEG 
XE  1870  AS="PS":CC$="{WHT)":MF 

»0:TF=0:EG=0:GS=0:GF=0 

:GT=0: IP=0:G=0:GOTO108 

0 


BEFORE  TYPING  .  .  . 
Before  typing  in  programs,  please 
refer  to  "How  to  Type  In 
COMPUTEI's  Gazette  Programs." 
elsewhere  in  this  issue. 


Financial  Planner 

Article  on  page  44. 

FH    10    REM   COPYRIGHT    1939    COMPU 
TE!     PUBLICATIONS,     INC.    - 
ALL    RIGHTS    RESERVED 
XF    20    PRINTCHR$(147) ;CHR5{14) ; 
CHRS(8) :POKE53291,OiPOKE 
53280, ll:POKE646, 13 
FM    30    PRINTSPC(12) "COPYRIGHT    1 
9S9":PRINT    SPC  (6 ) "CQMPUT 
EI     PUBLICATIONS,     UiC . " 
MC    40    PRINT    SPC (10) "ALL   RIGHTS 

RESERVED."  ~ 

GG    50    SA  =  52224:IF    PEEi<(SA)"169 
AND    PEEK{SA+206)=96    THE 
N    CLR:GOTO250 
JB    60    H1  =  INT  (  (SA  +  13)/256) :Ll-( 

SA+13)-H1*256 
PG    70    H2=INT  (  {SA  +  150)/256)  :L2  = 

(SA+15a)-H2*25G:CS=0 
DM  30  FOR  AD=SATOSA+206:READML 
:CS=CS+ML:POKEAD,ML:NEXT 
SS  90  IF  CS023175  THEN  PRINT 
{SPACE)CHR5 (147) "ERROR  I 
N  ML  DATA": END 
RC  100  POKE  SA+5,Ll:P0KE  SA+9, 
H1:P0KE  SA+133,L2:POKE 
{SPACE)SA+138,H2 
PJ  110  SYS  SA:CLR 
FB  120  DATA  169,76,133,124,169 
,13,133,125,169,192,133 
,126,96,141,255,3 
HS  130  DATA  104,141,252,3,104, 
141,253,3,72,173,252,3, 
72,201,217,208 
MJ  140  DATA  7,173,253,3,201,18 
3,240,11,173,255,3,201, 
58,176,3,76 
KP  150  DATA  128,0,96,104,169,2 
20,72,  186,142,254,3,165 
,113,141,248,3 
BS  160  DATA  165,114,141,249,3, 


152,79,189,0,2,157,167, 

3, 2G2, 16,247 
FR  170  DATA  56,165,36,229,122, 

168,162,23,201,81,176,7 

3,169,0,141,13 
XB  18B  DATft  3,153,0,2,136,177, 

122,153,0,2,136,16,248, 

169,0,133 
AH  190  DATA  122,169,2,133,123, 

32,121,165,173,0,3,141, 

250,3,173,1 
EJ  200  DATA  3,141,251,3,169,15 

0,141,0,3,169,192,141,1 

,3,32,115 
AR  210  DATA  0,32,138,173,162,0 

,173,250,3,141,0,3,173, 

251,3,141 
HE  220  DATA  1,3,173,13,3,138,1 

41,13,3,240,6,169,0,133 

,97,133 
Mft  230  DhTh    102,173,248,3,133, 

113,173,249,3,133,114,1 

62,79,189,167,3 
QJ  240  DATA  157,0,2,202,16,247 

,169,0,133,13,174,254,3 

,154,96,0 
RK  250  DNS='"(DOWN)":LTS»" 

tRIGHT)":SP5="  "iDCS=DN 

S:HDS="{H0ME} {D0WN)":HR 

$=HD$+"{RVS)":H$=" 

{HOMS)":RS="{RVS}" 
KG  260  CDS="{CLR){D0WM)":C2S=C 

D5+DC$:US="{OPl":U3$=US 

+  lJS+U$sEBS-="  "  +  RS+"ERR0 

R" 
JK  270  FOR  1=1  TO  6;DNS=DH$+DN 

5!LT9=LT5+LT$:SP$=SPS+S 

PS: NEXT 
BG  280  DN^aLEFT?  [DN$,24)  !LT$"[. 

EFTS  (LT$,4B)  SSPS  =  LEFTS{ 

SP$,39) 
MF  290  DIM  C%(255) ,FC$(22) ,FC% 

(22)  ,FV(22)  ,V2  [22)  ,ZF(2 

2) !PRINTCHR$(14) 
PF  300  DIM  CF(50) ,CP(5e) ,CW(50 

) ,A(50) ,W(50) ,P(50) ,Q{S 

0}, 12(50) ,W2(50) ,TP[39) 
EP  310  POKE  7B4,108:POKE785,12 

2:POKE786,0 
EH  320  DEF  FN  RS (LN) =USR (LN 1 +P 

OS  ("  tA}iU>  <T>{2  £}?< 

{GXL'iE}") 
FD  330  T-FN  RS  (360) 
FG  340  FOR  K-1  TO  12:READ  A:CI 

(A) =K:NEXT 
PE  350  FOR  K='49  TO  Se:C%[K)=10 

:NEXT:C%(17)=5:C%[32)=7 
KK  360  DATA  67,95,133,134,13,1 

45,147,20,46,48,89,78 
QS  370  POKE  784,108:POKE785,12 

2;POKE786,0 
SK  380  DEF  FN  R2 ( RR) =INT (AN/RR 

+,5)*RR 
JA  390  DEF  FN  RD (RR) -INT (RR* 10 

0+.5)/100 
HJ  490  PRINTCD? 
MD  410  PRINTHD?;DC$"FIflANCIAL 

{SPACE} PLANNER"; DCS: PR  I 

NT"PRESS  #  OF  0PTIOH";D 

C5 
MA  420  PRINT"1.  COLLEGE  PLANNI 

NG" 
FX  430  PRINT"2.  CAR  BUV/LEASE" 
QB  440  PaiNT"3.  COMPOUND  INTER 

EST/SAVINGS" 
SS  450  PRINT"4.  LOAN  PAYMENTS" 
RS  460  PRINT"5.  FIXED/ADJUSTAB 

LE  RATE  MORTGAGE" 
QH  470  PRINT"6.  HOW  MUCH  LIFE 

(SPACE)  INSURANCE  DO  ifOU 
NBED?" 
MK  4B0  PRINT"7.  SHOULD  YOU  REF 

INANCE  YOUR  MORTGAGE?" 


PS  493  PRINT"8.  IRA 

{SHIFT-SPACE} PLANNING": 
AF=0 
MA  500  GETAS:IF  AS=""  THEN500 
PG  510  C=C%(ASC(A$)) :IF  C=l  TH 

EN  GOSUB930!GOTO4lg 
MD  520  IF  C=2  THEN  PRINTCHRS(1 

47) :END 
RF  539  IF  CO10  THeN400 
3M  540  PRINTDC$;R$"READtNG  DAT 

A  STATEMENTS  ..." 
MM  550  Of]  VAL(AS1  GOTO2000,300 

0,4  000,50  00,60  00,7000,8 

000,9000 
GP  560  GOTO4fl0 
PH  570  REM-- 
XK  580  FOR  I=a  TO  NR!PRIMTFCS( 

I) ; jGOSOB820;MEXT:RETUR 

N 
GK  590  HEM  PRINT  SCREEN  SUBROU 

TINE 
KB  600  RR=1104:PX=0;py=0:MY=22 

:FOR  TY=-22  TO  10  STEP-1 
QD  610  IF  PEEK(RR+TY*40)  032  0 

R  PEEK(RR+TY*40+1) <>32 

(SPACElTHEN  HY=TY;T5(  =  19 
SX  620  NEXT:GOSUB194Q:GOSUB720 

:IF  T<0  THEN710 
KQ  630  PRI NTH R$" PRINTING  ..,": 

OPEN?, 4, 7 
SE  640  FOR  1=0  TO  MY:T$=DCS!H= 

-2 
CX    650    FOR    J=0    TO    39;A=PEEK[RR 

+I*40+J)    AND    127:IF   A=9 

6  THEN  A=32:GOTO690 
FM  660  IF  A>0  AND  A<27  THEN  A= 

A+64:GOTO6B0 
XG  670  IF  A>64  AND  A<91  THEN  A 

=A+128 
GQ  680  IF  A032  THEN  H=J 
KE  690  TS=T$+CHR$(A) iNEXT 
HH  700  T$=LEFTSCT$,H+2) :PRINT# 

7,TS:NEXT:CLOSE7 
GG  710  GOSUB1959;RETURN 
SS  720  OPEN7,4,7:CLOSE7!T=ST 
JD  730  OPEN7,4:rF  ST=T  THEN  CL 

0SE7; RETURN 
GQ  740  PRINTHDSSP$:PRINTUS"PRI 

NTER  NOT  READY,  PRESS  < 
TO  CANCEL" 
PE  750  GETAS:IF  AS="<"  THEN  T= 

-1:CL0SE7: RETURN 
PH  760  IF  AS=""  then  T»T+1:IF 

(SPACEjT<9  THEN750 
XD  770  T=0!PRINTHDS;SP$:CLOSE7 

; GOTO 7 20 
XH  780  GOSUBl070:rF  QA-2  THEN 

{SPACE3RETURN 
RS  790  TS=T2$ 
SM  800  PRINTH3;LEFTS(DNS,CY+2) 

;PCS{CY)  ;TAB  (LC-9)  ; LEFT 

S  (SPS,9) 
HM  810  PRINTHS;LEFTS[DN$,CY+2) 

;FCS  (CY) ; :I=CY 
FG  820  IF  FCt(I)-0  THEN  PRINT: 

RETURN 
BF  830  ON  FC%(I}  GOSUB850 , 880 , 

890,910 
HG  840  PRINT  TAB (LC-LEN (TS) - (1 

=FC% (I)) ) ;TS:RETURN 
ME  850  IF  SF=0  THEN  TS=MIDS(ST 

RS{FV(I))  ,2,6)  <^"%"!RETU 

RN 
QD  860  T$=T2S+"%"!lP  T2S=""  TH 

EH   T$a"0%" 
GQ    870    RETURN 
GE    880    T$="$"+MIDS(STRS(INT (FV 

(I)+.5) ) ,2) :RETURN 
HG    890    T$="NO":IF    FV ( I)    THEN    T 

S="VES" 
HX    900    RETURN 
KM    910    TS=MIDS {STR$(IKT(FV[I) ) 

) ,2} IRETURN 


QP  920  REM  CALCULATOR  SUBROUTI 

HE 
GK  930  PRINTHS;SPS 
QB  940  T=0:A2S="":T$=HD$+SPS+" 

{UP)":PRINTT$:IP  CC5<>" 

"  THEN  A2S  =  STRS(VAI.(CC$ 

)) 
kd  950  printtSsfor  t2=0  to  TsN 

EXT: PRINT"?"A2S 
DM    960    GETA$:IF    AS<>""    THEN990 
SS    970    T=T+1:IF   T>199   THEN    T=0 

:GOTO950 
CH    980    GOTO960 
EA    990   T=0:A=ASC(AS) :IF   A=13   T 

HEN    CCS'=A2$:GOTO930 
AG    1000    IF(A>38    AND    A<:58    AND    A 

044)  OR  A  =  94  THEN  A2S 

=LEFTS(A2S+AS,38) :GOTO 

950 
SS  1010  IF  A=95  OR  A=67  THEN  P 

RINTHS;SPS:PRINTSP$:RE 

TURN 
DR  1020  IF  A=20  THEN  IF  LEN(A2 

S)  THEN  A2S=LEFTS(A2S, 

LEN(A25) -1} :GOTO950 
RF  1030  IF  A=147  OR  A=19  THEN 

( SPACE )A2S=""!GOTO950 
GS  1040  IF  AOai  AND  A069  AND 

A061  THEH960 
EK  1050  PRINT  TS;H$;SPS:IF  LEN 

(CCS)<21  THEN  PRINTHS; 

CCS"  ="; 
GS  1060  PRINTVAL(CCS) :RETURN 
QE  1070  IF  FCI(CY)<>0  THEN1100 
DP  1080  SF=0:GF=0:GOSUB1420:CY 

=CY+l:tF  CY>NR  THEN  CY 

=  0 
DG  1090  GOTO1070 
CA  1100  IF  SF=0  THEN  T2S=MID5( 

STRS(FV(C¥) )  ,2) :SF  =  1 
GJ  1110  PRINTHSfLEFTS {DNS,CY+2 

)  ,'RS?  :I=CY:GOSUB8  20:QA 

=  3 
XK  1120  GETA$:IF  A$=""  THEN112 

0 
EX  1130  A=ASC(AS) 
GB  1140  ON  CI(A)  GOTO1160, 1170 

,1180,1120,1190,1230,1 

270,1290,1370,1400,133 

0,1350 
QG    1150   GOTO1120 
KP    1160   GOSUB930:GOTO1120 
MH    1170    QA=1:RETURN 
RJ    1180    QA=2!GOSUB1770:RETURN 
RQ    1190    IF    A017    AND   A013    THE 

N1230 
SK    1200    GOSUB80a:GF=0;GOSUBl42 

0tCY=CY+l:SF=0:IF   CY>N 

R  THEN  CY=0 
AM  1210  IF  FC%[CY)=0  THEH1200 
RR  1220  RETURN 
XM  1230  GOSUB800 
FF  1240  GF=0:GOSUB1420:CY=CY-1 

;SF=0:IF  CY<0  THEN  CY" 

NR 
FD  1250  IF  FC%(CY)=0  THEN1240 
KS  1260  RETURN 
BF  1270  IF  A=147  OR  (A=32  AND 

(SPACE}FC* (CY) C>3)  THE 

N  T2$="":FV(CY)=0:RETU 

RN 
QA  1280  GOTO1320 
DF  1290  IF  LEN(T2$)<2  THEN  T2$ 

="":FV(CY)=0:RETURN 
PS  1300  T2$=LEFT$(T2S,LEN(T2$) 

-1) :FV(CY)=VAL(T2S) : RE 

TURN 
HF  1310  REM 

FD  1320  FV{CY)=1-FV(CY) JRETURN 
GJ  1330  IF  FC%(CY)=3  THEN  FV (C 

Y)=l 
QF  1340  RETURN 
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BJ  1350  IF  FC%(CX)*3  THEN  FV(C 

Y)  =0 
GH  1360  RETURN 
BD  1370  IF  FC%{CY)<>1  THEN  RET 

URN 

PQ  1380  FOR  J=l  TO  LEN(T25):IF 

MIDS(T2$,J,1)=CKR9(46 

)  THEN  J-7:NEXT:RETURN 

EC  1390  NEXT  J 

KH  1400  IF  GF=0  THEN  GF=1:T2S= 

AS:FV(Ci;)=VAL(T2$)  :  RET 

URN 
FH  1410  T2$=LEFT$(T29+fi5,7) :PV 

(CY)=VAL(T2$) : RETURN 
GQ  1420  IF  FC%tCy)=0  THEN  RETU 

RN 
KK  1430  IF  FC%(CY)<>1  THEN15fl0 
CP  1440  T$=HD5+SP$+HD$+"WARNIN 

G  -  *  RATE  " 
HS  1450  IF  FV(CY)>130  THEN  PRI 

NTT$; "GREATER  THAN  100 

":  RETURN 
XH  1460  IF  FV(CY)=0  THEN  PRINT 

TS;"IS  ZERO": RETURN 
BM  ^''■'0  IF  V2(CY)>0  AND  FV(CY) 

>V2{CY)*24-4  THEN  PRINT 

T$;"VERY    HIGH": RETURN 
DJ    1480    IF    V2tCY)>0    AND    FV(CY) 

<.l    THEN    PRINTTS"VERY 

{SPACE}COW":RETURN 
Gft    1490   GOTO1540 
BR    1500    IF    FC%(CY)<>4    THEN154a 
XM    1510   T$=HD$+3P$+HDS+"HARNIN 

G    -    #    IS {SHI FT -space}" 
DQ    1520   Tf    FV(CY)=0    THENPRINTT 

S; "ZERO": RETURN 
QH    1530    IF    V2(CY)>0    AND    FV{CY) 

>V2{CY)    THENPRINTT$; "E 

XTREMELY    LARGE" : RETURN 
AE    1540    PRINTHDS;SPS:RETURN 
EK    1550    IF    QT=ZT    THEN    RETURN 
KF    1560    QT=2T:T=FN    RS(ZT):I=0 
XX    1570    ZF[I)=0:READ    FC$(I):IF 
FC$(I)="E"    THEN    NR=I- 

IsRETURN 
SG    1580    IF    FCS(I)<>"IR"   THEN16 

00 
XP    1590    FCS(I)="IMFLATION    RATE 

":FC%{I)=1:FV(I)=4,'1:V 

2 [ I) =  5 : GOTO  163  0 
XQ  1600  V2(I)=-1:READ  FC%(I):I 

F  FC%(I)  THEN  READ  FV { 

I) :V2 (I)=FV(I) 
JS  1510  IF  FC%(I)=4  OR  FC%tI>'' 

1  THEN  READ  ZF ( I ) 
KA  1620  IF  FC%(I)=4  THEN  READ 

{SPACElV2(I) 
XD  1633  I=I+1:GOTO1S70 
GR  1640  R4=12:GOTOie6a 
RM  1650  R4=7 
EP  1660  TS="S"+MID${STR$(INT (R 

R+. S) ) ,2) :PRINTLEFTS(S 

PS,R4-LEN(T$) ) ;t$; :RET 

URN 
GD  1670  PRINT"S"MIDS(STRS(INT ( 

RR+.5) )  ,2) ; SRETURN 
QS  1680  AN$="$"+HID$tSTR5tAN) , 

2) 
ER  1690  IF  ftN=INT<AN)  THEN  ANS 

=ANS+".00":RETURK 
RS  1700  IF  ABS  (ftN*10-INT  (AN*10 

+.5))<.0O1  THEN  ANS=AN 

$+"0" 
QM  1710  RETURN 

PR  1720  PRINT: PRINT"CHANGE  ANY 
OR  ALf.  VALUES,  THEN  M 

OVE" 
PX  1730  PRINT "CURSOR  TO  THE  NU 

MBER  YOU  WANT" 
QA  1740  PRINT"CftLCULATBD  AND  P 

RESS  Fl." 
BF  1750  CY=2:SF=0:RETURN 
RE  1750  AN=FN  RD (AN) :GOSUB1680 
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:PRINTLEFTS (SPS,11-LEN 
(AN$) ! ;AN$; : RETURN 
CF  1770  PRINTHS;LEFT$ (DN$,NR+4 

) ; :FOR  RR=NR+4  TO  23 :P 

RINTSP9:NEXT 
MR    1780    PRINT    HS;LEFT5(DN$,NR+ 

4) : IF    AF=1    THEN    FV{CY) 

=  .01 
RM  1790  FOR  K=2  TO  NR:IF  ZF(K) 

»0  OR  FV(K}>00  THENi82 

0 
PP  1800  PRIHTFCS(K)"  =  0";ER$: 

K=NR:QA=3 
XB  1310  PRINT"  CHANGE  VALUE  TH 

EN  Fl  CALC,  <    MENU" 
CB  1820  NEXT; IF  QA=3  THEN  RETU 

RN 
GF  1830  PRINT  H$; LEFTS (DNS , NR+ 

4) ;RS"CALCULATING. . ."U 

S:SF=a;RETURN 
CG  1840  PRINTiPRINT"ENTSR  ALL 

{SPACE)VALUES  THEN  PRE 

SS  Fl  TO  CALC":CY=2:SF 

=0:RETURN 

SH    1350  PRINTHRSUS"PRESS  F5  "; 

T$:PF=-1 
RQ  1860  PRINTHRS"PRESS  Fl  ANOT 

HER,  F3  PRINT,  4  MENU" 

:GF  =  0 
HM    1870    GETA$:IF    AS"""    THEN187 

0 
HS    1880    A=ASC(A5):IF   A=67   THEN 
GOSLIB1940!GOSUB930:GO 

SUB1950:GOTO1370 
CE    1890    IF    PF<0    AND    A'!l35   THEN 

RA-4:GOTO1920 
SS    1900    IF    C%(A)>4    THEN1B70 
EB    1910    RA=C%  (A) -1:IF    RA<1    OR 

{SPACE)RA>3    THEN1870 
QC    1920    IF    PF<0    THEN    PRINTHS;S 

P$:PF=0 

MQ  1930  PR1NTHDS;SP$:RETURN 
SC  1940  FOR  K=0  TO  39:TP{K)=PE 

EKU064  +  K)  :NEXT:RETURN 
XX  1950  FOR  K=a  TO  39:P0KE  106 

4+K,TP(K) : NEXT: RETURN 
AB  2000  REM~ 
GC  2010  DATA  "COLLEGE  PLANNING 

",0,"  ",0 
JQ  2020  DATA  "TODAY'S  ANNUAL  C 

OST",2,11500 
MR  2030  DATA  IR 
AE  2840  DATA  "YEARS  UNTIL  COLL 

EGE",4,12,1,18 
BE  20S0  DATA  "I  YEARS  IN  COLf -^ 

GE",4,4,1,8,"  ",0 
BC  2060  DATA  "PRESENT  SAVINGS" 

,2,8500 
GR  2070  DATA  "AFTER  TAX  YIELD 

{SPACET", 1,7. 35,1 
GM  2080  DATA  E 
XE  2090  ZT=2000:LC=28:GOSUB155 

0 
KS  2100  PRINTCDS:SF=0 
AE  2110  GOSUB580 
RX  2120  GOSUBie40 
CK  2130  GOSUB780 
AK  2140  OH  QA  GOTO400 , 2150 , 213 

0 
CJ  2150  IF  FV(4)=0  OR  FV(5)=0 

(SPACE)THEN  AN=FV(CY): 

PRINT"*  IfEARS  0"+ER$!G 

OTO23  30 
GC  2160  T2=0:T3=0:T4=0:RI=1+(F 

V(8)-FV(3) )/10a:R3-l+F 

V(3)/100:R8=1+FV{8)/10 

0 
BX  2170  FOR  I=FV{4)  TO  FV(4)+F 

V(5)-l 
XE  2180  T2=T2  +  FV(2)/RIl"I 
AF  2190  T3=T3+R3|FV(4)/(RI| (I- 

FV(4) )) 


BC  2200 
KA  2210 

BE  2220 


HF  2230 

AA  2240 

RQ  2250 
AO  2260 


QB  2270 
CF  2280 


QQ  2290 

MC  2300 

KB  2310 

MB  2320 

BR  2330 

QG  2340 

SX  3000 

MA  3  010 

GF  3020 

GG  3030 

QE  3040 

XA  3050 

XB  3060 

HX  3070 

HF  3080 

CE  3090 

PE  3100 

SC  3110 

HF  3120 

GB  3130 

DD  3140 

MQ  3150 

DK  3160 

JD  3170 

AJ  3180 

GA  3190 

BF  3200 

BM  3210 

SF  3220 

RR  3230 

JM  32  4  0 

CH  3250 

XJ  3260 

KX  3270 

AD  3280 


HD  3290 
RC  3300 


T4=T4+R3|I*FV(2) 
NEXT  I:T3=T3*FV{2)-FV[ 
7)*R8|FV{4) 

PRINT"TOTAL  COLLEGE  CO 
STS  WILL  BE  S"fIHT  (T4  + 
.5) :PRINT 

IF  FV(8)=0  THEN  AN=T3/ 
FV(4) :GOTO2250 
AN-T3*FV(8)/10a/(RBTFV 
(4)-l} 

IF  AN>0  THEN2280 
RR=FV{7)-T2:PRINT"S^AVI 
NGS  EXCEED  NEEDS  Bt    "; 
:GOSUB1670 

PRINT".":O2=0;GOTO2330 
PRINT"YOU  NEED  TO  SAVE 
S"FN  R2 (25) "EVERY  YEA 
R" 

print"for  the  next"ffv 
(4) "years":an-t2-fv(7) 
print"or  set  aside  an 
{spaceTadditional  5";f 

N  R2(500) 

PRINT"TODAY  TO  PAY  FOR 

COLLEGE." 
AN-AN  +  FVt7)  :!)2=FN  R2(5 
00) 

GOSUB1860:ON  RA  GOTO40 
0,2100 

GOSUB600:GOTO2330 
REM-- 

DATA  "CAR  BUY/LEASE", 0 
DATA  "~",0 
DATA  IR,"  ",0 
DATA  "— BUY--",0 
DATA  "PRICE  OF  CAR", 2, 
12500 

DATA  "  FINANCING", 3,1 
DATA  "{2  SPACES}TRADE 
{space] IN/DOWN  PAYMENT 
",2,2000 
DATA  "{2  SPACES) ANNUAL 

%  RATE", 1,12,1 
DATA  "{2  SPACES)!  OF  M 
ONTHLY  PAYMENTS ",4,60, 
1,84, "--LEASE--", 0 
DATA  "  REFUNDABLE  SECU 
RITY  DEP",2,250 
DATA  "  INITIAL  PAYMENT 
", 2,373 

DATA  "  MONTHLY  PAYMENT 
",2,189 

DATA  "  #  OF  PAYMENTS", 
4,60,0,84 

DATA  "  BUY  OUT  PRICE", 
2,6200 
DATA  E 

ZT=3  00  0:LC=31:GOSUB15  5 
0 

PRINTCDS:SF=0 
GOSUB5S0 
GOSUBia40 

PRINT:PRINT"YEARS  TO  M 
ONTHS:  3/36, "4/48,  5/6 
0" 

GOSUB780 

ON  QA  GOTO400, 3230,321 
0 

IF  FV(6)=0  THEN  TC"FV ( 
5) :GOTa3280 

TC  =  FV(7)  :  I=FV(B)/100:R 
2=(1+FV(2)/100) i (1/12) 
:P=FV(5)-FV(7) 
EP=  (I*P/12)/(1-1/(I/12 
+  1) I  (12*FV(9)/12) ) 

FOR  J=l  TO  FV(9) 
TC=TC+EP/(R2]'J)  :NEXT 
T2=FV{12) :RI= (1+FV[2)/ 
100) I (1/12) :T2=T2+FV(1 
1)-FV(11)/R! fFV{14) 
FOR  J=l  TO  FV(14) 
T2''T2+FV(13)/RI  [J:  NEXT 


:T2=T2  +  FV{15)/RI|FV(1'1        SJ    4310 

) 
BJ    3310    PRINT"TOTftL   COSTS    FOR  KD    4320 

{SPftCElBUYING:    S";:IF         XM4330 

{SPACE}FV(S)-a    THEN    PR 

INTFV(5) :GOTO3330        SF  4343 
QA  3320  PRINT  IMT(EP*FV{9)+FV{   SF  4350 

7)+. 5) 
JF  3330  PRINT  SPC(15)"LEASING;   CA  4360 
S";INT(FV(13)*FVtl4)+   CH  4370 

FV(12) tFV(15)+.5) 
HE  3340  PRINT"REAL  COSTS,  AFTE   HG  4380 

R  INFLATION  ADJUSTMENT 

"  BP  4390 

KM  3350  PRINT  SPC (16) "BUXING: 

{SPACEj$"f INT (TC+-5)      XJ  4480 
PJ  3360  PRINT  SPC(15) "LEASIHG: 

$";INT(T2+.5)  RP  4410 

ED  3370  IF  FV(6)-B  THEN3390 
DX  3330  PRINT"  MOMTHLV  PAYMENT   AH  4420 

S  IF  FINANCED:  S";IHT{ 

EP+.5) ;HS  SE  4430 

XP  3390  GOSOBl860;ON  RA  GOTO40 

0,3170  HC  4440 

HK  3400  GOSUB600:GOTO3390 

RQ  4000  REM--  HX  44  50 

GC  4010  DATA  "COMPOUND  INTERES 

T/SAVINGS",0,"  ",0       HM  4460 
AR  4020  DATA  "PRESENT  VALUE", 2 

,2915  QC  4470 

FK  4030  DATA  "MONTHLY  ADDITION   AK  4480 

",2,35 
HC  4040  DATA  "ANNUAL  YIELD", 1,   QR  4490 

6.29,0 
MQ  4050  DATA  "#  OF  YEARS", 4, 9,    GE  4500 

0,49 
CP  4060  DATA  "FUTURE  VALUE", 2, 

10000  MO  4510 

BG  4070  DATA  E 
EM  4080  ZT=4000:LC=25:GOSUB155   MK  4520 

0  AM  5003 

AH  4090  PRINTCD$jSF-0!AF"1       CA  5013 
DA  4100  GOSUB533 

HM  4110  GOSUB1720  DA  5020 

RG  4120  GOSOB780 
AK  4130  ON  QA  GOTO400 , 4140, 412   ES  5030 

0 
QB  4140  PV-FV(2)  iR-'FVO)  :N"12:    RC  5043 

RI={1+FV(4)/100)|{1/12 

) :I=1-RI:Y=FV(5) :T=FV{   FJ  5053 

6) 
RF  4150  NY=Y*12:T2=PV*RITNY:T=    KE  5060 

T-T2:RM=RI|HY: IN=FV(4)    DA  5070 

/1200 
CA  4160  ON  CY-1  GOTO4170,4190,    JE  5080 

4250,4360,4420  XD  5090 

AM  4170  T4»0:FOR  K=0  TO  Y*12-l    HH  5100 

IT4«T4+R*RITK:NEXT        RA  5110 
RP  4180  AN=(FV(6)-T4)/RN:AN=IN    EQ  S120 

T (AN+.5> :GOTO4440 
CF  4190  IF  RI  =  1  THEN  AN=«(FV(6)    GQ  5130 

-PV)/NY:GDTO4210 
MH  4200  T5=(FV(6)-PV*RN)* (RI-1 

)/(RN-l) :AN=T5 
BQ  4210  AMS=MID$(STR5(INT (AH*1   HX  5140 

00-IHT(AN)*100)) ,2)       OS  5150 
BC  4220  IF  LEN(ANS>-1  THEN  ANS 

="0"+ANS  EH  5160 

DS  4230  ANS="5"+STRS{INT(AN))+ 

"."+AN$  JQ  5170 

HA  4240  AN=INT (AN+.5) :GOTO4470 
BJ  4250  AH="10:DA-4.95:G  =  0!A4-5    XK  5180 

00 
KM  4260  IF  NY*R+PV<=0  THEN4450 
DX  4270  IF  FV(6)<IJY*R  +  PV  THEN4 

460  AS  5190 

JA  4280  RI=(1+AN/100)|(1/12)  :R 

N=RI|NY:IF  A4>10  THEN    AJ  5200 

{SPACE]A4=INT(A4*.9) 
RG  4290  G2=PV*RN+R* (RN-1)/{RI-    HP  5210 

1):IF  INT(G2*A4+-.5)  =FV   EB  5220 

[6) •A4  THEN4350 
SB  4300  IF  G2<FV(6)  THEN4330      EK  5230 


AN»AN-DA:IF  G-1  THEN  D 
A-DA/2 

G=-l:GOTO42a0  MK  5240 

AN=AN+DA:IF  G=-l  THEN     PC  5250 
{SPACE}DA=DA/2 
G=1:GOTO4280 

AN=FN  fi2[.001) :ANS=STR    RP  5260 
5(AN) +"%":GOTO4470       FE  5270 
IF  NV*R+PV<=0  THEN4450 
IF  PV(6) <NY*R+PV  THEN4    KK  52B0 
460  PH  5290 

IF  RI=1  THEN  AN=(FV(6) 
-PV)/R/12;GOTO4410        BQ  5300 
Z='RI-l:AfJ=(FV[6)*Z+R)/   AH  5310 
{Z*PV+R) 

AN=LOG(ANJ/LOG(RI) :AK=    SH  5320 
AN/12 

AH=FN  R2t.l) :AN5=STR$(    HK  5330 
AN)+"  YEARS": GOTO 4 4 70 
IF  RI=I  THEM  AN=PV+R*N 
Y:GOTO4440 
AN=PV*RN+R* (RN-1)/(RI-    GB  5340 

1) 

AN«INT (AN+.5) :AN$="$"+    BF  5350 

STRStAN) :GOTO4470 

AN=FV(CY) :ANS="S  VALUE    JE  5360 

0"+ERS!GOTO4470 
AH=FV(CY) :ANS="NEGATIV    KP  5370 
E  RESULT"+ER$ 

FV{CY)=AN:GOSUB800        QK  5380 
PRINTH$;LEFT$(DN$,NR+3 
)  FC  5390 

PRINTSP5:PRINTSP$:PRIN    KM  5430 
TSP$:PRINTSPS  RE  5410 

PRINTU3$"  CALCULATED  "    KX  5420 
FCS(CY) : PRINT"  IS  :"AN 
$  QD  5430 

GOSUB18G0:ON  RA  GOTO40 
0,4090  PB  5440 

GOSUB60a:GOTO4510 
REM  — 
DATA  "LOAN  PAYMENTS",0   AF  54  50 

II  11  g 

DATA  "AMOUNT  OP  LOAN",    FR  5460 

2,21033 

DATA    "INTEREST    RATE",1        PM    54  70 

,11.897a  MH    5480 

DATA  "#  OF  MONTHLY  PAY 

MENTS",4,120,1,600 

DATA  "MONTHLY  PAYMENT" 

,2,300  SK  5490 

DATA  E  PK  5500 

ZT=500  0:LC=3a:GOSUB15  5 

0 

PRINTCDS:SF»0:AF=1       RR  5510 

GOSUB580 

GOSUB1720 

GOSUB78a 

ON  QA  GOTO400, 5133, 511   PG  5520 

0 

P=FV(2) :R=FVtS) :RI=(1+   MB  5530 

FV(3)/100)|tl/12):I=l- 

RI:NY=FV(4) :N=12:RN=RI    AJ  5540 

|NY  OH  5550 

I2=FV(3>/100;13=12/H+1 

IF  NY  =  3  AND  CV04  THEN 

T=4:GOTO5390  PK  5560 

IF  FV(5)=0  AND  CY05  T 
HEN  T=5:GOT05393 
IF  FV(2)"0  AND  CY02  T 
HEN  T=2:G0T05393 

IF  P>R*NY  AND  CY=3  THE    BG  5570 
NAN=FV(CY) ;ANS="NEGATI 
VE  RESULT"+ER$:G0T0541 
0  JM  55B0 

ON  CY-1  GOTO5200,5230,   KM  5593 
5323,5360 

IF  13=1  THEN  AN=R*NY:G 
OTO5220  XA  5600 

AN=R*N*(1-1/I3|NY)/I2    EJ  5610 
AN  =  INT  (RN+.5)  :ANS  =  "$"  + 
STRS  (AN)  :GOTO5410 
SF=0:AN=10:DA=4.95:G=0   FC  5620 


:IF  R*NY=P  THEN  AN-0:G 

OTO5310 

I2=AN/100:I3-I2/N4-1 

G2=(I2*P/N)/(1-1/I3|NY 

)  :IF  INT  (G2*50  +  .5)=R*5 

0  THEN5310 

IF  G2<R  THEN5290 

AN=AN-DA!IF  G-1  THEN  D 

A=DA/2 

G=-1:GOTO5240 

AN=AN+DA!IF  G--1  THEN 

tSPACE)DA=DA/2 

G=1:GOTO5240 

AN=FN  R2(.001) :ftN5=STR 

S  (AN)+"%":GOTO5410 

IF    13»1    THEN    AN=P/RlGO 

T0535a 

IF    R<P*I3-P   THEN   ANS=" 

MONTHLY    PAYMENT    TOO    SM 

ALL"+ERS:AN=FVtCY) : GOT 

05410 

AN=L0G(-1/(P*I2/R/N-1) 

) /LOG (I  3) 

AN=INT (AN+.5) :ANS«STR$ 

(AN) :GOTO5410 

IF    13=1   THEN   AN"P/«Y!G 

OTO5380 

AN=(I2*P/N)/(1-1/I3|NY 

AN°FN   RD(AN) :GOSUBI680 
: GOTO  54 10 

AN=FV(CY) :AN$=PCS(T) 
AN$=ANS+"    =    0"+ER$ 
FV(CY)-AN:GOSUBB00 
PRINTHSfLEFT? (DN$,NR+3 
) 

PR  I  NTS  P  S ! PR  I  NT  S  P$ ; PR I N 
TSP$:PRINTSP5 
PRINTU3$"    CALCULATED    " 
FC$(CY) ; PRINT"    IS    :"AN 
S 

PRINT:TS="T0    PRINT    PAY 
MENT    SCHEDULE" 
GOSUBia50:OH    RA   GOTO40 
3,5380,5470,5480 
GOSUB600:GOTO545a 
PRINTCDS"EtJTER    DATE    OF 
FIRST    PAYMENT     (<    CANC 
ED":  INPUT"    MOHTH     (1-1 

2)";M5 

IF  MS="4"  THEN5080 
M=INT(VAL(M$) ) :IF  M<1 
(SPACE]OR  M>12  THEN548 
0 

INPUT"  YEAR";YRS!yR-IN 
T (VAL(YRS) ) :IF  VR>100 
{SPACEjTHEN  YR=YR-INT ( 
YR/100) *i00 

GOSUB720:IF  T<0  THEN5a 
80 
PRINT"PRINTING  PAYMENT 

SCHEDULE. . ." 
OPEN4,4:CMD4 
AN=FV(2) :GOSUB176a:PRI 
NTDCS"  BORROWED  AT  "FV 
(3)  "%":AN  =  FV(5) 
PRINT: PRINTDCS" 
{3  SPACES) I {3  SPACES )D 
ATEC3  SPACES)PRINCIPAL 
{3  SPACES] INTEREST 
{2  SPACES) BALANCE  DUE" 
P=FV(2) :A=FV(5) :RI=FV( 
3)/1200: IF  FV(4)=1  THE 
N5690 

FOR  K=l  TO  FV(4) 
IF  K<100  THEN  PRINT"  " 
;  :  IF  K<10  THEN  PRINT" 
{SPACE}"; 
PRINTK; 

T$=DCS+STR$ [M) +"/"; IF 
{ SPACE !YR<10  THEN  T5=T 
$  +  "0" 
TS=TS+MIDS (STRS(YR) ,2) 
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;PRINTLEFT5  (SP5,7-LErJ  ( 

TSM  ;T$: 
hF    56:10  M=H  +  1:IF  H>12  THEN  M=l 

:YR=YR+l:IF  YR>99  THEN 
YR  =  0 
MQ  5643  IF  K=FV{4)  THEN  NEXTiG 

OT0569a 
KA  5650  T=P*RI:AN=A-T:GOSUB176 

e 

RM  S660  AN=T;GOSUB1760:PRINT" 

{SPACE}"; 
HQ  5670  P=P-A+T:AN=P:GOSUB176a 

rPRItJT 
FE     5680    NEXT 

EH    5690    T-P*Rl!AN«P!GOS0B176a 
SR    5700    AN=T:GOSUB1760!AN=a:GO 

SUB1760 
BE  5710  AN"FV(S) iPRIHT:PRINTDC 

5"  REGULAR  PAYMENTS;"; 

:GOSUB176a SPRINT 
BS  5720  AN=P+T:PRINTDC5"  LAST 

{SPACE ) PAYMENT : " ; : GOSO 

81760 
XG  5730  PRINT*4!CLOSE4 
AX  5740  PRINT"PRESS  Fl,  F3  TO 

(SPACE) GO  BACK  TO  LOAN 

S,  <  MENU" 
EQ  5750  GOSUB1870;ON  RA  GOTO40 

a,5aB0,5080 
HJ  6a00  REM — 
SF  6010  DATA  "FIXED  RATE  OR  AD 

JUSTABLE  RATE  MORTGAGE 

",0,"  ",a 

AH  6020  DATA  "PRINCI PAL" , 2, 860 

00 
CD  6030  DATA  "FIXED  RATE  MORTG 

AGE",0 
BB  6040  DATA  "  ANNUAL  %  RATE", 

1,10.86,1 
SX  60  50  DATA  "  POINTS", 1,3,0 
RB  6060  DATA  "  #  OF  YEARS ",4,3 

0,1,40 
CB  6070  DATA  "ADJUSTABLE  RATE 

£SPACETMORTGAGE",a 
DR  6080  DATA  "  INITIAL  INTERES 

T  HATE",  1,8. 93,1 
KK  6090  DATA  "  POINTS", 1,2,8 
SE  6100  DATA  "  YEARLY  CAP", 1,2 

,1 
BP  6110  DATA  "  LIFETIME  CAP",1 

,14,1 
PS  6120  DATA  "  tt  OF  YEARS",  4,  3 

0,1,40 
AF  6130  DATA  "  ",0 
FQ  6140  DATA  IR 
PP  6150  DATA  E 
FQ  6160  ZT=6000:LC-3a!GOSUB155 

0 
HR  6170  PRINTCD^lSF^BiGOSUBSaa 
XX  6180  GOSUBia40 
AF  6190  GOSUB78a 
PX  6200  ON  QA  GOTO400, 6210, 619 

a 

JJ  621B  H=12:12=FV(4)/10a:I3=I 
2/N+l:NY=FV(6) *12:P-FV 
(2) : Y=FV{6) :yY=FV(12) 

AA  G220  A2=(I2*P/N)/(1-1/I3|NY 

AM  6230  I2=FV(8)/100! I3=I2/N+1 

:NY=FV(12)*12 
KG  6240  AN=(I2*P/N)/(1-1/I3|'NY 

)  :A(0)=AN;W(0)=AN 
FJ  6250  MX=FV(11)/100:D=FV(10) 

/100:P(0)=P:Q{0) =P:12 ( 

0)=I2:W2(0)=I2 
BG  6260  CF(0)=FV{5)/10a*P:CP(0 

)=FV(10)/100*P:CW(0)"C 

P(0) iNY=¥Y*12 
AQ  6270  Y2-0:Y4=0:RI=1+FV(14)/ 

100 
MG  6280  FOR  K=l  TO  5:GOSUB6ai0 

SHEXT 
RD  6290  RR=A25PRINT"FIXED  RATE 


PAYMENTS  ARE 

{SHIFT-SPACE}"; :G0SUB1 

670:PRINT"  A  MONTH." 
JB  6309  RR=AN:PRINT"ARM 

{SHIFT-SPACE} PAYMENTS 

{space} START  AT  ";:GOS 

IIB1670:PRINT". 

{2  SPACES)^?  RATES" 
SQ  6310  RR=A(2) :PRINT"RISE  .51 
A  YEAR,  PAYMENTS  BECO 

ME  ";  ;GOSUB1670: PRINT 
MG  6320  RR-A(5) :PRINT"IN  2  YEA 

RS,  AND  "; :GOSUB1670:P 

RIHT"  IN  5  YEARS." 
QR  6330  RR=W{2)  :PRINT"1^N  THE  W 

ORST  CASE,  PAYMENTS  AR 

E  "; :GOSUB1670:PRINT 
FB  6340  RR-W(5) :PRINT"IN  2  YEA 

RS,  AND  "; :GOSUB1670:P 

RINT"  IN  5  YEARS." 
BE  6350  TS="F0R  further  ANALYS 

IS" 
HH  6360  GOSUB1850:ON  RA  GOTO40 

0,6170,6370,6380 
KD  6370  GOSUB600:GOTO6350 
GD  6380  IF  Y<6  THeN64ia 
FE  6390  TY-Y-1:1F  YY>Y  THEN  TY 

-YY-1 
OD  6400  GOSUBl770:FOR  K='6  TO  T 

Y+1:GOSUB6810:NEXT 
GE  6410  PRINTCDS;DCS"ADJ0STABL 

E  RATE  MORTGAGES  ARE  G 

REAT" 
KK  6420  PRINT" IF  INTEREST  RATE 

S  GO  DOWN,  AND  TERRIBL 

E" 
SB  6430  PRINT"WHEN  RATES  SKYRO 

CKET.{2  SPACES}ARMS  AR 

E  ALSO" 
RF  6440  PRINT"GOOD  FOR  PEOPLE 

( SPACE )WHO  MOVE  OFTEN. 

IT 

DO  6450  IFYY<>YTHENPR1NT"C0MPA 

RISONS  INVALID  BECAUSE 
LENGTHS {5  SPACES }DIFF 

ER.":GOTO6570 
QS  6460  IF  Y2>0  THEN6490 
PP  6470  PRINT"THE  FIXED  RATE  M 

ORTGAGE  IS  SUPERIOR.  T 

HE"; 
PQ  6480  PRINT"ARM  MAKES  SENSE 

{SPACeTTf  RATES  GO  DOW 

N.":GOTO6570 
CK  64  90  PRINT"Xf  INTEREST  HATE 

S  INCREASE  .5%  A  YEAR" 

GH  6S00  PRINT"(A  REALISTIC  AND 

PESSIMISTIC  SCENARIO) 
II 

SG  6510  PRINT"AND  YOU  SELL  WIT 

HIN"Y2"YEARS  THE  ARM"; 

PRINT "IS  BETTER."; 
HK  6520  IF  Y4=0  THEN6570 
MG  6530  PRINT"{2  SPACES)iF  RAT 

ES  RISE  QUICKLY  {UP" 
HP  6540  PRINT"YEARLY  CAP  EVERY 

YEAR) ,  YOU  STILL" 
RD  6550  PRINT"COME  OUT  AHEAD  I 

F  SELL  WITHIN"Y4 
QS  6569  PRINT"YEARS," 
RF  6570  PRINT:TS="TO  PRINT  COS 

T  ANALYSIS  TABLE" 
KE  6580  GOSUB1B50:ON  RA  GOTO40 

0,6170,6590,6610 
SQ  6590  GOSUB6aO:GOTO6570 
RQ  6600  IF  A-95  THEN6170 
XM  6610  GOSUD72B;IF  T--1  THEN6 

170 
JA  6620  OPEN4,4,7:CMD4 
CE  6630  RR=fi2:PRINTDCS"FIXED  R 

ATE  PAYMENTS  ARE  " ; : GO 

SUB1670:PRINT 
JJ  6640  IF  FV(61 ''FV(12)  THEN66 

60 


DK  6650  PR  I  NT DCS "WARNING  1  COST 
COMPARISON  INVALID  BE 
CAUSE  OF  TERM  DIFFEREH 
CE." 

BP  6660  PRINT: PRINTDC$"CUMULAT 
IVE  REAL  COSTS  AND  HON 
THLY  PAYMENTS" :PRINT 

HA  6670  PRINTDC?"YR{7  SPACES }F 
IXED{7  SPACES}RISING  R 
ATES{7  SPACES  J WORST  CA 
SE" 

JG  6680  PRINTDC$"{9  SPACES }COS 
TS{7  SPACES) COSTS 
{2  SPACES) PAYMENT 
{5  SPACESJCOSTS  PAYMEN 

Fnti 

OE  6690  FOR  K=0  TO  TY 

AE  6700  PRINTDC$;MID5{STR5 (K) , 

2); 
AJ  6710  IF  K<10  THEN  PRINT" 

{SHIFT-SPACE}"; 
EB  6720  RR=CF(K) :GOSUB1640:RR= 

CP(K) :GOSOB1640:RR=A(K 

) :GOSUB1650 
CR  6730  RR=CW(K) :GOSOB1640:RR= 

W(K) ;GOSUB165a:PRINT:N 

EXT:  IF  YOYY  TKEN6780 
KD  6740  PRINT; PRINTDCS"OVER  TH 

E  LIFE  OF  THE"Y"YEAR  M 

ORTGAGE  THE  REAL  COSTS 
ARE:" 
CE  67S0  RR»CF(TY+1} :GOSUB1640: 

PRINTDC5"  FOR  THE  FIXE 

D  RATE  MORTGAGE" 
DJ  6760  RR=CP(TY+1) :GOSUB1640: 

PRINTDCS"  FOR  THE  ARM 

{SPACEJWITH  RISING  INT 

EREST  RATES" 
KK  6770  RR=CW[TY+1) :GOSUB1640: 

PRINTDC5"  FOR  THE  WORS 

T  CASE  ARM" 
FQ  6780  PRINTt4TCL0SE4:PRINTCH 

RS  {147)HR$"PRESS  Fl,  F 

3  ANOTHER,  <  MENU":GOS 

UB187a 
MF  6790  IF  A=95  THEN400 
JR  6800  GOTO6170 
HP  6810  T=K-ltN4=NY-K*N 
FR  6820  H  =  N/RI]'T:CF(K)=CF(T)+A 

2*H:CP(K)=CP(T)+A(T) *H 

:CW(K)=CW(T)+W(T)*H 
PS  6830  IF  CF(K)>CP(K)  THEN  Y2 

=  K 
RE  6840  IF  CF(K)>CW[K)  THEN  Y4 

"K 
JJ  6850  I2»I2{T)/12:W2=W2 (T)/l 

2!P=P(T) :Q=Q(T) :A=A(T) 

:W-W(T) 
QR  6860  FOR  J=l  TO  N 
DG  6870  P=P+P*I2-A:Q=Q+Q*W2-W 
QH  5880  NEXT  J: Q (K) =Q: P (K) =P 
MG  6890  I2(K)  ='I2(T)+,005:  IF  I2 

[K) >MX  THEN  I2(K) =MX 
JD  6900  W2(K)=W2(T)+D: IF  W2{K) 

>MX  THEN  W2(K)=MX 
QD  5910  IF  N4=0  THEN  A(K)=0:W( 

K)=0:P(K)»0lQ(K)-0:GOT 

06950 
JF  6920  IF  K>Y  THEN  CF(K)=CF{T 

) 
PX  6930  A(K)  =  (12  (K) *P(K)/N)/(1 

-l/(I2(K)/Ntl)'rN4) 
BA  6940  W(K)=(W2[K)*Q(K)/N)/(1 

-1/(W2(K)/N+1) |N4) 
QG  6950  RETURN 
MM  7900  REM — 
SK  7910  DATA  "LIFE  INSURANCE  N 

EEDS",9,"  ",0 
DF  7020  DATA  "TOTAL  HOUSEHOLD 

{SPACeTsALARY  INCOME", 

2,43000 
BF  7030  DATA  "YOUR  SALARY,  BEF 

ORE  TAXES", 2, 25000 
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MQ  7040  DATA  "ANNUAL  SAVINGS", 

2,2000 
CD  7050  DATA  "YOUR  AGE", 4, 42,0 

,99 
EA  7060  DATA  "#  OF  PEOPLE  IN  H 

OUSBHOLD",4,4,0,10 
XX  7070  DATA  "AGE  OF  VOUNGEST 

(SPACETpERSON",4,6,0,9 

9 
AB  7380  DATA  "  ",0 
JR  7090  DATA  "CASH,  SAVINGS/CH 

ECKING  ACCT.", 2,1200 
EE  7100  DATA  "S^TOCKS ,  MUTUAL  F 

UNDS",2,5000 
MR  7110  DATA  "HARD  ASSET  INVES 

TMENTS",2,0 
QQ  7120  DATA  "  "  ,  0 ,  "HOME  MORTG 

AGE", 2, 50000 
KC  7130  DATA  "CAR  LOAN ",2,50 00 
BM  714  0  DATA  "CONSUMER  DEBT",! 

,500 
DP  7150  DATA  "COLLEGE  FUND", 2, 

65000 
BQ  7160  DATA  "CHARITABLE  COKTR 

IBUTIONS",2,1000 
FD  7170  DATA  "CURRENT  INTEREST 

RATE"7l,9.3  5,0 
XJ  7180  DATA  E 
RS  7190  2T=7000:LC=3a:GOSUBlS5 

0:IF  Q2>0  THEN  FV(16)= 

Q2 
JX  7200  PRINTCDS;SF=0 
BG  7210  GOSUB580 
CS  7220  GOSUB1840 
DP  7230  GO3UB780 
SR  7240  ON  QA  GOTO400, 7250, 723 

0 
FX  7250  IF  FV(2)<FV(3)  THEN  PR 

INTFC$(2) "  LESS 

{SHI FT -SPACE) THAN": PR I 

NTFCS (3) ;EBS:GOTO7520 
HC  7260  FE=,6*FV(3) : IF  FE<6000 

THEN  FE=6000 
XD  7270  CA=FV(9) +FV(10)*.9+FV( 

11)*.8:CD=FV(13)+FV(14 

)+FV(15}+FVU6) 
JG  7280  IF  FV(6)<2  THEN  AN=FE- 

CA+CDSGOTO7400 
BM  7290  RE=FV{3)-FV(2}/(FV(6)+ 

,5)-FVt4)*FV(3)/FV(2) : 

I»FV(18)+1:IF  K2.5  TH 

EN  1-2.5 
XS  7300  R2=RE*2:IF  FV(3)<4000 

{SPACElOR  FV(5)<25  OR 

{SPACE)FV(6)<2  OR  FV(7 

) >18  THEN7330 
RM  7310  T4»FV(3):IF  T4>37000  T 

HEN  T4='37000 
AE  7320  RE=RE-4000-(FV(6)>3)*l 

400-T4/15 
KG  7330  IP=RE/I*100+R2:IF  IP<0 

THEN  IP=0:GOTO7360 
KX  7340  IF  FV(7)<10  THEN  IP=IP 

*  (1+(10-FV(7) )/33) 
EQ  7350  IF  FV[7)>12  AND  FV(7)< 

21  THEN  IP=IP*{1-{FV{7 

)-12)/33) 
XJ  7360  T=FV(3)/(FV{2)+1) 
^5P  7370  AN  =  IP+FE-CA*T+CD*SQR{T 

)+FV{17) !IF  FV(6)>2ANO 
IP<1THEN  AN=AN+(FV(6) 

-2) *2500 
HD  73B0  IF  ANM00000  THEN  AN-F 

N  R2(5000) :GOTO7410 
HX  7390  IF  AH>50000  THEN  AN=FN 

R2  (2500)  :GOTO7410 
BF  7400  aN=FN  R2(1000) 
JQ  7410  PRINTSP$:PRINTSPS:PRIH 

TU3$ 
CJ  7420  IF  AN<1000  THEN  PRINT" 

YOU  MAY  NOT  HEED  ANY  L 

IFE  INSURANCE. ":GOT075 

20 


ep  7430  print"you  should  have       gm  8280 
{spaceTabout  $";str$!a 

N) 
ES  7440  PRINT"IN  LIFE  INSURANC    SG  8290 

E  COVERAGE. {2  SPACES )L 

OOK  INTO"  HK  8300 

EG  7450  T$="UNIVERSAL  LIFE":A=   OS  8310 

FV(5):T=AN/FV[2) 
EX  74G0  IF  T>10  OR  (T>8  AND  AN   FG  8320 

>30)  OR  {T>6  AND  A>35) 
THEN  TS="TERM  LIFE":G   HB  8330 

OTO7490 
BG  7470  T=FV(2)/FV(4) JIF  T<5  0   BK  8340 

R  (T<6  AND  A<35)  THEN 

{ S PACE )TS» "TERM  LIFE":    EG  8350 

GOTO7490 
PR  74B0  IF  A<35  OR  (A<S5  AND  F 

V(4)<1000)  THEN  T$="TE   SX  8360 

RM  LIFE  OR  UNIVERSAL  L   HQ  8370 

IFE" 
SA  7490  IF  FV(3)>7S000  AND  FV ( 

4)<FV(2>/50  AND  CA<FV(   HC  83B0 

3)  THEN  TS="WHOLE  LIFE 

It 

AX  7500  IF  FV[4)<FV(2)/25  AND 

(SPACE)FV(5)>45  AND  CA    oj  3390 

<FV(2)  THEN  TS="WHOLE 

{SPACE)LIFE" 
PC  7510  PRINT"A  "T5"  POLICY. "H    BJ  8400 

$ 
RB  7520  GOSUBia60:ON  HA  GOTO40 

0,7200  MA  8410 

AP  7530  GOSUB600:GOTO7S20        QC  8420 
BF  8000  HEM — 
RE  8910  DATA  "REFINANCING  A  MO 

RTGAGE^,0,"  ",0  AA  84  30 

CD  8020  DATA  "CURRENT  FINANCIN 

G",0 
DX  B030  DATA  "  CURRENT  BALANCE    GE  B4  40 

",2,65000 
AJ  8040  DATA  "  ANNUAL  *  RATE", 

1,12.5,1  FA  8450 

MF  S050  DATA  "  It  PAYMENTS  DOE" 

,4,300,1,490 
KF  8060  DATA  "  ", 0 , "SUGGESTED     CE  8460 

{SPACE)REFINANCING",0 
HM  B070  DATA  "  PRINCI PAL" , 2 , 65    BR  8470 

000 
DD  8080  DATA  "  ANNUAL  %    RATE",    GF  B480 

1,10.86,1  QE  9000 

HE  8090  DATA  "  #  PAYMENTS" , 4 , 3    XB  9010 

60,1,600 
KX  8100  DATA  "  POINTS", 1,3,0      PE  9020 
HX  8110  DATA  "  OTHER  CLOSING  C 

OSTS",2,250a  JG  9030 

XP  8120  DATA  "  PREPAYMENT  PENA 

LTY",2,0 
KR  8130  DATA  "TAX  BRACKET", 1,2    CB  9040 

8,0 
QA  8140  DATA  "^NTEREST  AND  POI    DK  9050 

NTS  DEDUCTIBLE", 3,1 
QS  8150  DATA  IR  HB  9060 

QF  8160  DATA  E 
GG  8170  ZT=8000:LC-37:GOSUB1SS    XX  9070 

0 
QX  8180  PRINTCDS:SF-a:GOSUB580    MS  9080 
BJ  8190  GOSUBia40 

RA  8200  GOSUB780  PF  9090 

CE  8210  ON  QA  GOTO400 , 8220,820 

0  RS  9100 

BG  82Z0  P=FV(3) :Q=FV(8) :I2=FV( 

4)/10O:W2=FV(9)/100:D=    am  911a 

1-FV(15) *FVC14)/10000    CQ  9120 
JQ  8230  NY=FV[5) :N4=FV(10) :PS- 

P:N=12  HA  9130 

XH  8240  PT={FV(ll)*D-FV(ll))/N    HR  9140 

4  XF  9150 

RM  8250  CF-0:CW=FV(13)+FV(12)+    JD  9160 

FV(ll)  XK  9170 

DE  B260  TY=NY:IF  TY<N4  THEN  TY 

=N4  XS  9130 

GA  8270  A=(IZ*P/N)/(1-1/(I2/N+ 

1)]NY) :AV=A*D 


RI=(1+I2)|(1/N):R2=(1+ 
W2)Ta/N)  :R4=(1  +  FV(16) 
/10i)T(l/N) 

W=(W2Aq/N)/(1-1/(W2/N+ 
1) |N4) :WV=W*D+PT:AH=0 
FOR  K=l  TO  TY 
P=P*RI-A:0=Q*R2-W:RK"R 
4|K 

CF-CF+AV/RKsCW -CW+WV/R 
K 

TP»CF-(PS-P)/BK;TQ"CW- 
[PS-Q)/RK 
IF  TQ<TP  AND  AN=0  THEN 

AN'-K 
IF  K/12=INT(K/12)  THEN 

T=K/12:P(T)-TP:Q(T)=T 
Q 
NEXT 

print"the  payments  on 
{spaceTrefinancing  WIL 

L  BE" 

IF  ABS  (R-WX.5  THEN  PR 
INT"ABOUT  THE  SAME  AS 
{SPACE }THE  OLD  PAYMENT 
S.":GOTO8420 
IF  A>W  THEN  RR"A-W:G0S 
UB1670:PRINT"  LESS  THA 
N  THE  OLD  PAYMENTS." 
IF  A<W  THEN  RR=W-A:GOS 
UB1670: PRINT"  MORE  THA 
N  THE  OLD  PAYMENTS." 
IF  AN>0  THEN8440 
PRINT"REFINANCING  WITH 
THESE  TERMS  COSTS  YOU 

CI 

PRINT"MONEY,  SO  YOU  PR 

OBABLX  SHOULDN'T  DO  IT 

.":GOTO8470 

AN=AN/12:PRINT"Y0U  MUS 

T  WAIT  "FN  R2  (.1) "YEAR 

S  FOR" 

PRINT"THE  REFINANCING 

{SPACE }T0  BE  BETTER  TH 

AN  THE" 

PRINT"EXISTING    MORTGAG 

E."H5 

GOSUB1860;ON  RA  GOTO40 

0,8180 

GOSUB600!GOTO8470 

REM~ 

DATA    "IRA    PLANNER ",0," 


'YOUR   AGE", 4, 42,0 


",0 

DATA 

,65 

DATA  "CURRENT  IRA 

(SHIFT-SPACE) BALANCE", 

2,7100 

DATA  "THIS  YEAR'S  CONT 

RIBUTION",2,2000 

DATA  "ESTIMATED  ANNUAL 

YIELD^, 1,9. 23,0 
DATA  "CURRENT  TAX  BRAC 
KET", 1,28,0 
DATA  "EARLY  WITHDRAWAL 

PENALTY", 1,10,0 
DATA  "%  OF  CONTRIBUTIO 
N  DEDUCTIBLE", 1, 100,0 
DATA  "RETIREMENT  AGE", 
4,6  7,0,70 
DATA  "TAX  BRACKET  WHEN 

YOU  WITHDRAW", 1,33,0 
DATA  IR,E 

ZT=900a:LC=36:GOSUBl55 
0 

PRINTCDS:SF=0 
GOSUB580 
GOSUBia40 
GOSUB780 

ON  QA  GOTO4a0, 9180, 916 
0 

if  fv(9)<=fv(2)  then  p 
bintfc$(2)"  greater 
(shift-spaceTthan  "FC$ 
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PR  qiqo  v^l,wQf"If,^f;^°^°f*^^  157B:00  90  00  00  00  Q0  00  00  as  1823:AD  8B  84  FB  09  AS  7fl  C9  4ft 

PE  9190  y-FV(9)-FV(2):RI  =  l+FV{  1583:00  00  00  00  00  00  00  00  ad  182B:00  F0  03  4C  9fl  06  ft9  BA  07 

5)  » (100-FV(6) )/la000  15SB:B0  00  00  00  00  00  00  00  b5  1833:35  03  A9  77  85  02  20  56  5E 

QD  9200  R2=(100-FV(6))/100:R3=  1593:00  00  00  00  00  00  00  00  bD  ia3B:C2  A5  02  C9  03  F0  01  60  51 

(100-FV(10) )/10a:I=l+F  1598:00  00  00  00  53  75  70  70  87  1843:ft5  7C  F0  3D  A9  0B  85  03  DE 

V!5)/100  15A3:6f  72  74  73  20  31  35  34  4C  184B:A9  52  B5  02  20  56  C2  A5  3B 

JX  9210  I2=FV(4)*I|i;-FV(4) :DRa  15AB:31  2C  20  31  35  37  31  20  99  1853502  C9  02  D0  03  4C  32  06  F7 

FV(8)/100:fID-FV(4)-FV(  15B3:26  20  31  35  38  31  20  64  9D  185B:C9  0C  D0  07  A9  82  85  76  D6 

4)*DR:DD=FV(4) *DR  15BB:72  69  76  65  73  20  61  6E  E8  1863:4C  85  06  C9  0D  D0  07  A9  DB 

KG  9220  ftK=r2*R3  +  DD*R3-MD*R2*R  15C3:64  20  62  72  69  6E  67  73  E2  186B:81  85  76  4C  85  06  C9  OE  3? 

I]'Y+ND:T3=FV(4)*R2:AZ=  15CB:20  62  61  63  6B  20  43  3D  A0  1873:D0  0B  A9  84  85  76  A9  01  A6 

RIfif*T3  15D3:20  6F  72  20  67  65  6F  73  SD  187B:85  7E  4C  95  06  A9  83  85  53 

CC  9230  PRINT  "CONTSIBUTION  WIL  15D3:20  66  69  6C  65  73  00  00  9C  1883:76  ft6  77  A5  76  9D  00  80  8C 

L  BE  WORTH  $"INT(AN+,5  15E3:00  00  00  00  00  00  00  00  0E  188B:A9  01  85  79  85  78  A5  7E  F0 

)  15EB:00  00  00  00  00  00  00  00  16  1893:D0  03  20  A9  07  60  A6  77  0A 

XJ  9240  PRINT" (AFTER  TAXES)  WH  15F3:00  00  00  00  00  00  00  00  IE  189B:E9  BD  00  80  85  0E  E8  BD  AB 

EN  TOU  RETIRE,"  15PB:00  00  00  00  20  BI  06  A9  A3  18A3:00  80  85  0F  20  AO  C2  D0  A3 

KE  9250  PRINT"COMPARED  TO  $"Ifi  1603:0C  85  03  A9  3C  85  02  20  AD  18AB:01  60  4C  32  06  A9  02  20  IC 

T(A2+  51"0[lTqinP  THP  r  160B:5A  CI  A9  0C  85  03  A9  48  9E  1803:39  CI  20  9F  CI  00  C7  00  8C 

RA  "•T-(100-FV(7n/lB5'  1613:85  02  A9  00  20  51  CI  60  El  18BB:00  3F  01  A9  00  20  39  CI  2B 

FR  9260  PRiNTRS'-qTTrr  rtrf-riraT  16J-B:20  BD  CI  A9  09  85  03  A9  A7  1803:20  9F  01  96  BE  3D  00  03  7B 

TNG"           CALCULfiT  ^623:82  85  02  20  56  C2  60  4C  FE  18CB:01  20  A2  CI  96  BE  3D  00  IF 

EK  9270  T6-PVf11*TTv*Bl  162B:2C  C2  20  BD  CI  A9  00  85  38  18D3:03  01  FF  20  AE  CI  72  00  29 

io-rvij,  iiY  KJ  1633:7C  4C  6ft  04  20  BD  CI  ft9  63  18DB:ftO  18  2D  20  46  69  6C  65  20 

AM  9280  T3  =  PVMT*R7.ftM-0  163B:01  85  7C  4C  6fi  04  ft9  0B  5F  1RE3:20  52  65  74  72  69  65  76  27 

MH  l^ll    llJl\\?r'w  1643:SD  ID  85  4C  BF  C2  A9  0C  5B  18EB:65  72  20  2D  IB  00  20  AE  0A 

FF  9300  T4-fFVf4T°rT»t  FVMVl.R  ^^46:80  ID  85  4C  BF  C2  ft9  0D  64  18F3:C1  43  80  AE  43  6F  70  79  F2 

3!nn*Bl  i^il^IoTT^lwn  1"3:8D  ID  85  4C  BF  C2  A9  OE  6D  18FB:72  69  67  68  74  20  31  39  F2 

KB  9310  T6-T6+tI-?f  kIfvI2^>^9  }"S  =  S°  ^°  ^^  "^  BF  C2  A9  OF  76  1903:38  39  2C  20  43  4F  40  50  69 

KB  9310  T6-T6+T4.IF  K+PV(2)>59  1663:8D  ID  85  4C  BF  C2  A9  01  70  190B:5S  54  45  21  20  50  75  62  47 

„^  n-,^„   I"^^  '^"^    „   „^    „  166B:85  7D  A9  12  85  70  ft9  01  52  1913:6C  69  63  61  74  69  6F  6E  EE 

BG  9320  T8-T4-ND:T3=T8*T!T8=T8  1673:85  71  A9  02  85  77  A9  00  71  191B:73  2C  20  49  6E  63  2E  00  08 

+ND  1678:85  7A  85  79  85  7E  AD  C6  99  1923:20  ftE  CI  78  00  BA  41  6C  Aft 

HS  9330  T5=T3*RI|K:IF  Te>T5  AN  1683:88  29  3F  C9  01  F0  27  C9  a6  1928:6C  20  52  69  67  68  74  73  BS 

D  AN=0  THEN  AN=K:T7«=T4  16SB:02  F0  IF  C9  03  DO  OF  A9  98  1933:20  52  65  73  65  72  76  65  35 

RJ  9340  NEXT  1693:03  85  7D  A9  28  85  70  A9  CE  193B:64  2E  00  60  A2  02  20  98  27 

JJ  9350  PRINTU5"I.F  YOU  COHTBIB  169B:03  85  71  B8  50  10  A9  0A  84  1943:C2  A0  00  81  02  C9  ftO  FO  83 

UTE  THIS  ftMOUNT  EVERY"  16A3;85  03  A9  F4  85  02  20  56  A2  1948:08  99  51  7F  CB  CO  10  DO  44 

EF  9360  PRINT"YEAR  YOU  WILL  HA  16AB:C2  60  A9  02  85  7D  20  40  49  1953:F2  ft9  00  99  51  7F  60  AD  F9 

VE(SHIFT-SPACE)$"INT  (T  16B3:07  20  5B  07  A5  02  C9  03  13  195B:8D  84  C9  02  F0  0B  A9  09  DE 

6) "WHEN  YOU"  16aB:D0  03  4C  El  04  C9  06  DO  DC  1963:85  03  A9  47  85  02  4C  90  20 

SK  9370  PRINT"RETIRE  (AFTER  PA  16C3:11  A9  0A  35  03  A9  4F  85  5F  196B:07  AD  89  84  38  E9  08  AA  2A 

YING  TAXES). {2  SPACES)  16CB:02  20  56  C2  20  Al  C2  4C  51  1973:BD  BE  84  29  80  DO  08  A9  4C 

THIS  WILL"  16D3:6ft  04  C9  0B  D0  06  20  94  93  1978:06  8D  43  09  4C  88  07  A9  49 

JM  9380  PRINT"BE  WORTH  $"INT(T  16DB:07  4C  6A  04  60  ftS  70  85  2C  1983:00  BD  43  09  A9  09  BS  03  91 

6/(l  +  FV{ll)/100)  TY)"AF  1-6E3:04  A5  71  85  05  ft9  80  85  57  198B:A9  28  85  02  20  56  C2  60  AD 

TER  INFLATION."  16EB;0B  A9  00  85  Oft  20  E4  CI  BC  1993;AD  89  84  C9  08  FO  05  A9  E3 

QJ  9390  IF  AN=0  THEN  PRINT"AN  16F3:A9  00  85  78  AD  00  80  85  21  199B:0B  4C  A2  07  ft9  09  20  B0  0C 

{SPftCEllRft          ""  16FB:72  AD  01  80  85  73  ft6  77  83  19A3:C2  20  ftl  C2  60  A5  77  18  40 

(SHI  FT -SPACE} MAY  NOT  B  1703:BD  00  80  DO  03  20  BF  05  E9  19AB:69  15  ftB  89  00  80  C9  01  IF 

E  RIGHT  FOR  YOU  "'GOTO  1708:A5  77  C9  E2  F0  08  18  69  92  19B3:F0  2B  A4  77  C8  B9  00  80  E2 

5420            "  '  1713:20  85  77  4C  02  05  ft5  78  4E  19DB:85  04  C8  B9  00  80  85  05  78 

AJ  9400  PRINT"IT  Wirt  TAKF"AN"  1718:F0  13  A5  70  85  04  ftS  71  3B  19C3:20  4a  08  A9  10  85  0B  A9  8A 

^Kim  g^pQ^^"^  '^^^,,  "  1723:85  05  A9  80  85  OB  A9  00  3E  19CB:00  85  0A  20  E4  CI  AD  00  2C 

PK  9410  PHrMT"WTTHnRAwar q  AHP  172B:85  Oft  20  E7  CI  ftS  72  F0  9B  19D3:10  F0  63  85  04  ftD  01  10  F7 

bK  y4J.M  yRINl  WIIHUBAWALi.  AHb  1733:00  95  yg  ^5  73  35  71  a9  EF  19DB:8S  05  B8  50  E3  ft4  77  C8  97 

1738:02  85  77  4C  El  04  AD  8B  S5  19E3:B9  00  80  85  04  C8  B9  00  12 
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1A13:04  E8  BD  00  11  85  05  20  04 

1773:D0  01  60  A9  08  83  03  ft9  0F  1A1B:4A  08  A9  10  85  0B  A9  00  58 

177B:12  85  02  20  56  C2  60  A9  7E  1A23:8S  0A  20  E4  CI  AD  00  10  C3 

1783:0A  85  03  A9  9F  85  02  20  4A  1A2B:C9  00  FO  Dl  85  04  AD  01  18 

178B:56  C2  60  A5  77  IB  69  03  ED  1A33:10  B5  05  B8  50  El  A5  7C  CE 

1793:AA  BD  00  80  D0  01  60  AS  7F  lft3B:D0  0B  A5  75  85  05  A5  74  A6 

PrOnranr  1*  File  RelMeUPr             179B:7C  do  OE  ft5  77  IS  69  16  5D  1A43:85  04  20  4A  08  60  A9  82  7B 

n      .  ■■IB  iieiiiiirci             17A3:ftA  BD  00  80  C9  0D  D0  01  C3  1A4B:85  21  A9  00  85  20  A5  7D  35 

1503:BF  00  CO  00  03  20  00  04  CI    17AB:60  A5  77  18  69  13  A8  B9  86  1A53:C9  03  DO  39  A9  89  85  21  7A 

150BSF0  00  08  08  00  16  44  00  10    1783:00  80  C9  00  DO  03  4C  06  SC  1A5B:A9  00  85  20  A5  04  C9  28  10 

1513:25  C2  00  22  61  00  5A  3A  9C    17BB:06  85  04  85  74  CB  89  00  61  1A63:90  0D  38  E9  28  AA  A9  9C  A4 

1518:80  47  17  40  31  91  AO  18  67    17C3:B0  85  05  85  75  A9  81  85  57  1A6B:B5  21  A9  80  85  20  8A  85  ZF 

1523:E8  10  08  98  F0  04  47  F0  67    17CB:0B  A9  00  85  Oft  20  E4  CI  9E  1A73:1C  A9  00  85  ID  A9  00  85  8D 

1528:02  C3  20  01  66  90  00  BE  8F    17D3:ftD  00  81  C9  00  F0  03  4C  BB  1A7B:1F  A9  06  BS  IE  A2  IC  A0  17 

1533:58  00  4C  98  00  3F  44  00  22    17DB:06  06  AD  01  81  C9  FF  F0  78  1AB3:1E  20  60  CI  A5  IC  18  69  2E 

153B:1C  A8  00  00  DC  00  00  28  ftC    17E3:a3  4C  06  06  AD  02  81  C9  0A  1A8U:0A  A8  B8  50  42  A5  7D  C9  78 

1543:83  06  00  00  04  FF  03  00  D6    17EB:03  F0  03  4C  06  06  AD  03  A3  1A93:02  DO  37  AS  04  C9  23  90  SC 

1548:04  46  69  6C  65  20  52  65  B2    17F3:81  C9  15  F0  03  4C  06  06  62  1A9B:31  18  69  B9  A8  20  0E  09  22 
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C9 
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FOR    I'l    TO    3l!GET#2,B$: 
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B0 

07 

3B 

E9 

10 
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79 
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20 

66 

6F 

19 

NEXT 
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09 

C9 

20 

B0 

07 

3S 

E9 

25 
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20 

00 

18 

50 

52 

47 

IB 

0E 

AX    230 

IF    D5=GF5    THEN260 
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ftA 
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06 

09 

38 

E9 

20 

£□ 
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18 

S3 

45 

51 

IB 

00 

IB 

Bl 

EC    240 

NEXT    E:IF    NTS=NLS   THEN2 
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CB 

CB 

CB 

G8 

CB 

20 

16 

26 
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4S 

4C 

IB 

00 

18 

55 

53 

F9 

60 

lBaB:09 

60 

Bl 

20 

38 

E9 

01 

91 

13 

1DD3:52 

IB 
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D7 

0B 

00 

00 
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B4 

FX    250 
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1B13:20 

60 

A9 
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E0 

00 

F0 
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A4 
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4A 

04 

D7 

0B 
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01 

E3 

CR    260 

IF    DS=«NL$   THENPRINT" 
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CA 

4C 

la 

09 

49 

FF 

31 

B2 
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S2 

04 

D7 
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IB23:2S 

91 

20 

60 

81 

0B 

10 

10 

40 

1DCB:08 

5A 

04 

D7 

0B 

00 
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09 

0B 

10 

20 

74 

09 

OB 

A6 
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62 

04 

81 

FF 

06 

81 

82 

E0 

CP    270 

PRINT" {DOWN ICONVERTING 
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12 

11 

34 

DE 

BB 

1DDB:FF 

BF 

E6 

0B 

00 

00 

06 

10 

AF 
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1B3B:0B 

03 

11 

0B 

02 

11 

4A 

06 

49 

1DE3:42 

04 

05 

FF 

82 

FE 

80 

04 

FS 

MJ    280 

DT$=T$:DSg»SS:TS=HTS:S$ 

1B43:11 

IE 

00 

ai 

0B 

10 

10 

61 

BB 

1DEB:00 

82 

03 

80 

04 

00 

BB 

03 

C3 

=HSS:GOSUB370 

1Q4B:09 

0B 

10 

20 

74 

09 

0B 

10 

BA 

1DF3:80 

FC 

01 

80 

00 

03 

80 

C6 

A9 

»B    290 

GET((2,MTS,MSS5IF   MS$  =  "" 

1B53:30 

51 

7F 

03 

11 

08 

06 

11 

DB 

1DFB:00 

00 

00 

03 

80 

C3 

3D 

B3 

A7 

THEN    MS$-CHRS(0) 

1B5B:XE 

02 

11 

4A 

00 

18 

52 

65 

52 

1E03:3C 

03 

80 

C3 

39 

B3 

66 

03 

D2 

BM    300 

FOR    I"0    TO    6S:GET    fi2,BS 

1B63:74 

72 

69 

65 

76 

65 

IB 

20 

93 

1E0B:B0 

C3 

31 

B3 

66 

03 

80 

C3 

DD 

•  NEXT 

1B6B:61 

20 

66 

69 

6C 

65 

20 

00 

F6 

1E13:31 

9E 

7E 

03 

80 

C3 

31 

9E 

A3 

HG    310 

GET#2,CT$,GT$:GOEUB370: 

1B73:6F 

6E 

20 

74 

68 

69 

73 

20 

38 

1E1B:60 

03 

80 

C6 

31 

8C 
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03 

50 
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1B7B:64 
1BB3:7F 
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18 
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2A 

00 
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CC 
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09 
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0B 
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58 
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lE33:0e 
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82 
FF 
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81 

ac 
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7F 
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FF 
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81 

0C 
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BF 
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9A 

FP    320 

S=DTS:S5=DSS:GOSUB370 
FOR    1=0   TO    32*E+2:GET#2 
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49 
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;  of  Addreis.  Please  allow  us  6-8 
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How  To  Type  In 
COMPUTE!' s  Gazette  Programs 


Each  month,  COMPUTEI's  Gazette 
publishes  programs  for  the  Com- 
modore 128,  64,  Plus/4,  and  16. 
Each  program  is  dearly  marked  by 
title  and  version.  Be  sure  to  type  in 
the  correct  version  for  your  ma- 
chine. All  64  programs  run  on  the 
128  in  64  ipode.  Be  sure  to  read  the 
instructions  in  the  corresponding 
article.  This  can  save  time  and  elim- 
inate any  questions  which  might 
arise  after  you  begin  typing. 

We  frequently  publish  two 
programs  designed  to  make  typing 
easier:  The  Automatic  Proofreader, 
and  MLX,  designed  for  entering 
machine  language  programs. 

When  entering  a  BASIC  pro- 
gram, be  especially  careful  with 
DATA  statements  as  they  are  ex- 
tremely sensitive  to  errors.  A  mis- 
typed number  in  a  DATA  statement 
can  cause  your  machine  to  "lock 
up"  (you'll  have  no  control  over  the 
computer).  If  this  happens,  the  only 
recourse  is  to  turn  your  computer 
off  then  on,  erasing  what  was  in 
memory.  So  be  sure  to  save  a  pro- 
gram before  you  run  it.  If  your  com- 
puter crashes,  you  can  always 
reload  the  program  and  look  for  the 
error. 


Special  Characters 

Most  of  the  programs  listed  in  each 
issue  contain  special  control  charac- 
ters. To  facilitate  typing  in  any  pro- 
grams from  the  Gazette,  use  the 
following  listing  conventions. 

The  most  common  type  of  con- 
trol characters  in  our  listings  appear 
as  words  within  braces:  {DOWN} 
means  to  press  the  cursor  down 
key;  {5  SPACES}  means  to  press 
the  space  bar  five  times. 

To  indicate  that  a  key  should 
be  shifted  (hold  down  the  SHIFT 
key  while  pressing  another  key), 
the  character  is  underlined.  For  ex- 
ample, A  means  hold  down  the 
SHIFT  key  and  press  A.  You  may 
see  strange  characters  on  your 
screen,  but  that's  to  be  expected.  If 
you  find  a  number  followed  by  an 
underlined  key  enclosed  in  braces 
(for  example,  {8  A}),  type  the  key 
as  many  times  as  indicated  (in  our 
example,  enter  eight  SHIFTed  A's), 

If  a  key  is  enclosed  in  special 
brackets,  %  %,  hold  down  the 
Commodore  key  {at  the  lower  left 
corner  of  the  keyboard)  and  press 
the  indicated  character. 

Rarely,  you'll  see  a  single  letter 
of  the  alphabet  enclosed  in  braces. 


This  can  be  entered  on  the  Commo- 
dore 64  by  pressing  the  CTRL  key 
while  typing  the  letter  in  braces.  For 
example,  {A}  means  to  press 
CTRL-A. 


The  Quote  Mode 

Although  you  can  move  the  cursor 
around  the  screen  with  the  CRSR 
keys,  often  a  programmer  will  want 
to  move  the  cursor  under  program 
control.  This  is  seen  in  examples 
such  as  {LEFT},  and  {HOME}  in 
the  program  listings.  The  only  way 
the  computer  can  tell  the  difference 
between  direct  and  programmed 
cursor  control  is  the  quote  mode. 

Once  you  press  the  quote  key, 
you're  in  quote  mode,  This  mode 
can  be  confusing  if  you  mistype  a 
character  and  cursor  left  to  change 
it.  You'll  see  a  reverse  video  charac- 
ter (a  graphics  symbol  for  cursor 
left).  In  this  case,  you  can  use  the 
DELete  key  to  back  up  and  edit  the 
line.  Type  another  quote  and  you're 
out  of  quote  mode.  If  things  really 
get  confusing,  you  can  exit  quote 
mode  simply  by  pressing  RETURN. 
Then  just  cursor  up  to  the  mistyped 
line  and  fix  it,  6 


When  you 

{CLR} 
{HOME} 

{UP! 

{DOWN} 
{LEFT} 
{RIGHT  J 

{RVS! 
(OFF} 

{BLK} 
{WHT| 
{RED} 
{CYN} 


Presi:         See: 

shIft]  [cLr/homT] 

[aR/HOMTj 
SHIFT  j  pfcaSRj]  W 


\  CRSR  { 


SHIFT 


■^CRSR  — 


II 


—  CRSR  — 


CTRL 

CTRL 

CTRL 

CTRL 

CTRL 

"'"  "'-■^ 

CTRL 


When  Vou  Read: 

{PUR! 
{CRN! 

[BUI! 

JYEL! 

{  n  ) 

{  ¥2  I 

{  ra  ! 

{   FJ   1 

{  FS  ) 

{  F6  1 
{  F7  } 
{  FB  ) 


Press; 


CTRL 


CTRL 
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Preii: 
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h"'"i  rr 


I  SHIFT  I  fin 


For  Commodore  G4  Only 

commodorf]  [Tj  n 


SHIFF 


Z] 


SHIFT 
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CZ] 


SHIFT 
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lag 


[commodore]  \Y] 

[commodore  I  [jj  n 

IroMMoboREl  [  •!  ]  Cn 

j  commodore]  [?]  E 

I  commodore]  |T|  H 
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TABUSHED  1968 


FOR  CUSTOMER  SERVICE 

Call  Mor-Frl;9:30am.4:30pm 
(718)692-1146 


Retail  Outlet:  Penn  Station,  Main  Concourse 
(Beneath  Madison  Square  Garden)  NYC,  NY  10001 


lt?JlrMlL*iMt^LMi]|  j|iini.^*H<1lg*fJ3il;Rfl!!tikM»^^  I 


OR  WRITE  TO: 


'I'liiuu'^ririiii 


FOR  ORDERS  &  INFORMATION  CALL  TOLL  FREE 

1-800-759-6565 


P.O.  Box  58  Brooklyn.  NY  11230 

FAX  NO.  7186923372 
TELEX  422132  MGRANT 


O  commodore  C=  ,„  J^agatc 


0 128r  D 

COMPUTER  PACKAGES 


SPECiAUt 

m    C/129-D  DELUXE  PKG, 

•  &128-D  COMPUTER  Wr'BUILT-IfJ 
DISK  DRIVE 

■  COMMODORE  1902  RGB  COLOR 
MONITOR 

■  COMMODORE  COLOR  PRINTER 


J629  - 


wHKA  ■ 


#2  C/128-D  COMPLETE  PKG. 

■  C/12SD  COMPUTER  w/BUILT-IN 
DISK  DRIVE 

■  COMMODORE  COLOR  PRINTER 

■  12' MONITOR 


$459 


C/!2a-DWITHW3i 
MONITOR 


$659 


OHM. 


COMPUTER  PACKAGES 
m  COMPLETE  PACKAGE 

■  COMMODORE  C-64;C  COMPUTER 

■  COMMODORE  1541/C  DISK  DRIVE 

•  COMMODORE  COLOR  PRINTER 
■12- MONITOR 

•  GEOS  SOFTWARE  PROGRAM 


«349 


#4  COLOR  PACKAGE 

■  COMMODORE  C-B4/C  COMPUTER 
•  COMMODORE  1541-C  DISK  DRIVE 
•COMMODORE  COLOR  PRINTER 
•COLOR  MONITOR 

■  GEOS  SOFTVttRE  PROGRAM 


NEW  C-12QD  with 
Bulir-ln  Disk  Drive 


With  GEOS 

Software 

$-)  1  995 

^399 


H7M  EXPAr^lON  MODULE „,(1 14,65 

XFTEC  S.  GRAPHIIJH.  IWTEnFACE. tZB.K 

XEIEC  S.  GFI4PHII  Sft  ItniKfKL. uasA 

JnECSUPEBaRAPHlXGOLO. tTiM 

C-MC  -MC  POWEflSUPPLr (29 .9S 

C- 1  CM  H  ODER .™ S  \  t.»S 

0 1  »7(l  M  ODEK, „ ise.ss 


COMMODORE  13M  HOUSE... 

COMMODORE  1351  MOUSE 

'  MAGIC  VOICE  MODULE 

XETEC  LT.  KERNEL  !OMB 
12flK  Mtfncfv  EiHniiDn  Iv  139. 1Z9D. 
HARD  DBiVES  FOB; 
C.«;C _ 

XEIEC  4  WB  HA  RO  DRTvE  FOS! 

CH'ia  1 1UD ,.,„.. 


.mos 
...ta.K 


..K»» 


17« 

t7H 


II  l« 


crommodore 

DISK  DRIVES 

^OlS71      521995 

ti58i   ^lyg^^* 

C=  1S41II    5-15995 

MONITORS 

COMMODORE  10B4 3279.95 

COMMODORE  1802 
I  COLORMONITOR... 3189.95 


AMIGA  500.. 
AMIGA  500 

RGB  COLOR  PACKAGE 

Amiga  500w,?i2K  •  B-Jit-in 

3.5"DiskDmo.lAiuse.HGB 

CotorMon.loi 

wte 


.$529 


FfoeSotl-    ,ifei 


^729 


AMIGA  SOO  Wllh  1084 *799 

AMiGA.sq 


^'^■101 


iCTvr 


..»979 


AMIGA  2500 

3MB  RAM  ■  BuiJ-in  3.5'  Disk  ^  _       ^  ^ 

Drire    •    40MB  Hard  Di3V9  $0-1  QQ 

Keyboard  ■  Mouso  •  Amga  O   I  «7  9 
Basic    •  Syswm  Softwaio 

AMIGA  1010  DISK  DRIVE *189.'^ 

A-1 680  MODEM *99.»* 

ALL  OTHER  AMIGA 

PERIPHERALS  & 

ACCESSORIES  IN  STOCK! 


1DB4  RGB  COLOR  MONITOR 


it 


commodore 

COLT  PACKAGE 


1 


Manllof 
Jn  Dill  [fed 


ji 


■  ffl«a«^r,itTO .. 


COMMODORE  COLT  Computsi  ■  MDK 
4,77-7.1 6MHi  .  2  Floppy  Disk  Dri^s  •  12- 
H  0  h  Reso:  j'j  on  M  Dfo  Mon.iot  -  All  H  ooJ(-iip 
Cables  &  Adapters  .  MS  DOS  &GW  Base 


^659 


COmOOORSCQLT     $AAQ 


SANYO  PR-3000A 

0al3y  Wheel  Leiter  Qualify  Printer 


WE  CAN  RECOKRGURE 

ANY  OF  OUR  COMPUTER 
PACKAGES  TO  YOUR 

SPECIRCATIONS.  CALL 
FOR  INFORMATION. 


Sf 


/VMIQ 


AMIGA  2000 

A-JWO  Ccwipula  w.'KujtHH.'I)  •  1  MB  Eip.  lo  8WB 
Dull  in  3.5' Disk  Dii™       oi   .    .^  ^  j^ 

M359 

AMIGA 
;      .^^       2000 

7  ,    ^^  RGB 

5^^^-x^     COLOR 
^^ '  PACKAGE 

A  ?[X>0  CarrputN  w.'Koybcard  -  i.h'  D^  Drrva 

^1559 


AMIGA  2000  wn084      1h  COQ 
MONITOR  IDZa 


AMIGA  2000  HD 

DishDri»e.44MElH.D.     ■*  |  yyy 

K^ytxiard  .  Mouso 

Syslom  Sotiwa'e  ■  Amiga  Bass: 


SEAGATE 

20, 30, 40, 60, 80  MB 

HARD  DRIVES 

IN  STOCK! 


commodore 

PC10-1 


IBM  XT  COMPATIBLE  PKQ 
il2K  RAM  .  JMK  Rcppy  Dii«  ■  xr 

Baicl\i  [>iJ(«1».M3  DOS  S  CW  Site 


«499 


COMMODORE 
PRINTERS 


MPS  1 250  *219 

MPS-10O0  PRINTER    '169 

PRINTERS 

HP  LASERJET  l?£j. 
SERIES  ii 

'1629 

HPOtUiidl (MS 

EPSON 

FX.BM. 039    LO-MO (5JS 

FX-IOK was    IQ-IOM i7» 

LQ-£M MIS  Lx-soo im 

LO-SSSO tSIt    LO-S50 tSM 

Panasonic 


..ti»  i(»a... 

.we    IE24.... 


IMU.II... 

ISSS 

HBO...... 

1191 

4450La« _ tta« 

1MK  ..11W.SS 


315 
...t»« 


1 040C  RiiinbiM 

lOOO 

lOOOR^nbiiw 


.S22«.K 
UN.9S 


OKIDATA 


..tiit.te 

..tl39.» 


OKIDATAUO 

OKIMATE!0. 

pjjoo tw.os 

PKOo Mae.si 

PHOO tC«9.9S 


CITIZEN 


WSp.lSt E»9.9S 

HSP-M tas.ss 

MSP.45 OM.BS 

MSP-50 5m.M 

uiiGurEtJ* tMs.ss 

IHIBJtEIJl    .       I5WI1S 
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OFFICIAL 


Advaiiced 
Dungeons^^taagons; 


i^efc^lito; 


COWPUIER  PRODUCT 


HEmms  OF  ime  Lance 


^ii'i. 


PRAGOINLAINCE®  game  world 


vti 


iV 


V 


ap 


ATARI  ST 
AMIGA 

IBM 

Coming  soon: 

~C-64/128 


*mi^- 


^\J 


lOrdcn    ^  J 

Ur  rctnller  or  call  l-SOW 
tvc  SSI's  cortipkHc  product  tataloe], 
^^'Va^*M  to:  SSI,  1046  n.  Kciifjstof 
onntain  View,  CA  94043.         :■« 


iHiii 


iTRATEOIC  SIMULATIONS,  INC. 


lLl>:i.  t 


ki..  d.  t; 


Look  for  POOL  OF  RADW^CE,  an  ADftD* 
ranlasy  Kolc-Playlng  Epic  scl  In  Ihc 
FORGOrrEPi  RE/U-MS  ■  game  world. 

Available  now  for  C-64/I28  and  IBM. 
Coming  in  1989;  ATARI  ST,  AMIGA, 
APPLE  II  OS  and  APPLE  U. 
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